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Program LIa tings In The Transaclor 

All tJrograms Hsled in The Transarlnr will apppar w thpy would on your screen in Upper/Lower C34e 
mode. To clarify two polcnlial character mix-ups, zeroes will appear m "0" arwi the letter "o" will uf luurie 
be in lower case. SeccjEidly. the tower ca^e L [T] lids & flat lop as opposed (o The numf>er ! which hai an 
angled lop^ 

Many pro^^ams wtll contain reverse video characters that represent cursor movements, colours, or 
lunciion keys. These will also be shown exactly as ihey would apijfar on youi screen, but they're listed 
here for reference. 

Ocra^innally prr^am*; will contain lire? that show consecuttve spaces. Ofltn the number of spaces you 
insert will not be critical to coned operation o( the pic^ram, When il is, Ihe required numl>er d q>aces 

will bestiown. For example: 
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Hush right' - would be shown is- print' [&p4celO]flu»b right* 
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I'dUkelo take this opportuniryioapobgize for Ihcdc!ayirrcleasingour I St and 2nd issues, but we now have 50 n^ mom 

future reieasesshould be fairly repilar. However, [think you'll agree ihai anything worth doing right is worth a liitle extra effort. 

Oralotextra. asihecasemaybe Early in outplanring!5t^get we decidf^ thai program listing?; should also bi^typew-tjhe main rea'^on for 
thedelay. Aiiheriskof benditigyourear. I'd like to explain some ol the technicaljiiesot this very exact sciaice. 

Hrslof all J thought i[ might bequickertofindatypeselterlhalcould accept daiadirectly from the compuler rather than re-kev^ 

arlides. And I did, . . Alticr>pesetiingt>fToronio{see the News section of Issue 01 Eordelails}. Getting the two machines fo communicate 
was a snap, and in fact, the easiest task of all. as 1 was lo find out later. 

Once the lexE was in the typesetter editor, several other problems became apparent. The wordprocessorbreakilhw>olt<xtl<pa«tk>ns that 
are nolnecessarUyalthe same spot5(hetypeseiier would break aLTherelore,di carriage returns sent by my niachine had to be repl^^ 
spaceainfhetypesellctedhoT.Twocarriagerclurns, however, indicate aparagraph break, and arc replaced by a typesetter ''End Paragraph" 
command But what about twocarriagereturnsthalindicateextra spacing between hlocksoftextTThispresenleda new wrinkle that could 
only be solved one way, . , by Itdruini^ tUi; dfloJ iype:icLLLJLg, Naie E^Eiionof Allic liauded me 3, inch thick ^iMuud^ diid uEf [ wciu. 

AftersCudyinfisorrenOcommancIsandvarialions, ! came back and said/'Naie, . 1 i^et the impression that several of These are noi often 
used?". Nate's answer? A simple "No", foilowcd by a delayed smile. "Uh huh, i see..", and away I went again. 

Nexli:dmelliespeclakharatlersuse<liaprograjn!is(ings.Symbolslike<,>, +, =,1, and\ are not all availablefrom certain type faces. This 
requiresacommandtochanget^pefaces, sett hecharacler. and return back to theprevious typeface. Reverse fieldcursor graphics. . well. 

explaiainglhesewouldiakeabouiaslongasthe typesetter command siring required to obtain them. 

Kortunately mosi of this can bedoneautomatlcally. The typesetter editor has a leaturecalled 'Translation Tables'". fWuch like agiant search 
and replace, it allows a maximum of 300 different sequences of characters to be modified si muilaneously. Building the translation table 
requires careful planning rliough, sincp chararfE^r seqiienres that are subsets ot other sequences must be placed lower in the list, else 
incorrea replacements occur. So far we've used up about half ol the 300 available hues, and additions are frequt-nl. 

One Other problern we managedtoovercome was that oltakins consecutive PRllNTstatements that contain flraphics and "liilnfl them Up" 
to make them more legible for entering. An ehcciivc width table override was necessary, but since no such command exists, new width 
tables were compiled that give each characterequal width, or "mono-width". Thespacerharacier Is not contained m the width tablesince it 
has a variable width, Todefea! this, aspecial, rather cosmicsoundingcommand is invoked called "Space Limit". This allows you to specify 
the minimum width used by a space and was set to the same value as our mono-width characters. 

Bui all this was laking longer than I expected. The Transactor was getting later and 
later aisd I had to deride, "is it worth it. . maytjel should just list everything 
on a reguUr prinltt usjug bracketed mnemonics to represent 
special characters, as in the past". After some discussion. 

we determined that the iimespent here would only be 
traversed once, and that successive issues would 
approach straighllorwaid. Secondly, the superlative 
quality and appearance would definitely be worth 
the effort. The former has been noticed since we 
beganworkingon Issue 02. But Ihelattercanonly 
be confirmed by you, the reader. 

Once ayaiu, thank you lor y<ii/ patience. 
Until next i 
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News and New Products 



Jim Buttcrf icid C^^nterfold 

Special thanks lo John Barr and Joan Gore of the Art Shoppe 
in Toronto for permission to use the premises and sel-up 
assistance. "In all the world, there's only one Art Shoppe'\ 

and there's definitely only one Jim Buiterlield . . the two go 
together well, don't you think? 

Jin has been working for the past severaJ monitis as chief 
consuttant for the TVO Academy on Computers in Educa- 
tion., a basic course exploring the operaHon and function of 
computers, (see the next segment lor details) Pari of the 
course isaPv'seriescalledfflsonf/fi^/esfor which Jim has 
been the main source of technical content. A resource book 
isalsolncliided. . .Jim wrote most of that too. 

As if this weren't enough, Jim will be hosl/guesl expert on a 
half-hour lollow-jp show scheduled immediately after 
each Bits and Dyies program- At the time of writing, a name 
for the show had yet to be chosen. 

Unlike Bits and Bytes, the second 1/2 hour will have an 
open format. off-the-cuH approach as opposed to a rigid 
script. In the first episode, the notorious Butlerfield dismem- 
bers a pedectly innocent microcomputer, as sludiu partici- 
pants witness this sinister perpetration, f^o word on the 
brand , . a Radio Shack would be the mos! deserving. 



Nevertheless, it all sounds like great fun! 

Coupled with the stacks of material Jim pumps out every 
month, his Machine Language course at George Browti 
Collie, TPUG and other club meetings, presentations at 
conferences world wide, consulting for V.\^M. and rhe hun- 
dreds of phone calls he gels eveiy week, his new TV role 
should make Jim one busy guy! 

Is this the birth of a star? Where will ll lead? Stratford? 
Broadway? The silver screen? Well, we couldn't wait for 
these trivial details, nor couid we wait for Cosmopolitan. So, 
may we present lo you, our first centerfold, . . 
Jim Butterfield. the definitive human transactor! 

(Almosl makes us feel guilty for using the name, "77ie 
Transactor". Maybe we should change it to "A Transactor") 



TVOntario Academy on Computers in Education 

Asmeiiiioneii, iheTVO Academy on Computers is a course 
designed lo solve some of the mysteries surrounding the 
microcomputer. Catering to busy adults who would rather 
learn at home than travel to a cla»roo[n, the course is 
actually a package deal that includes much more than just 
the TV' show. For J59 you get a pile of stuff! 
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• A 64 pag<^ P;5rtiri pant's Gjide 

• A 64 paye Resource Book (by J.B.) 

• The Academy Newsletter to be 

published 3 times dtiring the series 

• A 40 pai^e Educational Applications Handbook 

• A Hands- On Beginner's Manual 

• Related Sample Software (casselle tape) 

For $53 dollars you get everything but the last 2 items. 
Fitherway, it's a bargain if this is what youVe been waiting 
for. Also consider that community college nigtit courses 
Stan around £55 with books extra. 

The course bei^lns with the firsi of 12 shows airini^ Wednes- 
day February 1 6th at 9:00 pm, on your local TVOntario 
channel (19 in TO.}, Each show is repeated the following 
Saturday al 12:30 pm. Some topics wilJ include lansiuages 
like BASIC, LOGO and PILOT filing techniques, modems 
and network communications, graphics and music, 
wordprocessing, spreadsheet pro^qrams, and the future of 
Computer Assisted Instruction (CAI), 

Bits and Bytes is hosted by Billy Van and Luba Goy. Van 

plays the part of the anxiojs-to-lcarn, inquisitive ^'average" 
viewer. Luba Goy is the course instructress. The pair [both 
from comedy back^ounds) should have no trouble main- 
taining a light, friendly, and entertaining atmosphere. 

Once again, Jim Bjtterfield follows each Bits and Bytes, No 
mention of this show is made in the brochure, but it will 
surely be considered an added bonus. TVO is also working 

on a "buddv system", where regisiranis will be informed of 

others in their immediate area. 

For more information on enrollment, call Ariel Lanq 
Loughridgc at TVO, 21S0 Vonge Street. Toronto. The num- 
ber is 4 1 6-484-2607, 



BASIC Fundamentals Course 

On a local note. . . Steve Punter (author of WordPro) will be 
teaching a BASIC course at the Ftobicoke Public Library, 
1745 Eglinlon ^\e. W, at Dufferin St. Cost is $30 dollars. For 
morecall41678l 5208, 



January 83 CE5 Las Vegas 

Just like every year, the Consumer Electronic Show in Las 

Vegas was the largest so far. Somewhere in the neighbor- 
hood of 70,000 came to satisfy their curiosity. . . an impres- 
sive follow-up !o the largest ever Comdex (Computer 



Dealers F,xhibition) last November Around 50,000 showed 
up for this one which is supposedly of! limits to the public- 
Several new products made their debut at Comdex, several 
more at CE5. Commodore lends to save their new stuft until 
CES, This year there were 5 items premiered (or should I say 
4 and a half), l^ s get to these first. 

The SX- 100 

Basically, a Commodore 64 in a different casing. The unit, 
designed to be portable, is Commodore's answer to the 
Osbourne. It's smaller than the Oshourne [weighing in at 18 
lbs,) and comes with 1 or 2 disk drives and a 5 1/4 inch 
screen. No details yet on availability or price, probably 
around the $1500 US. mark. 

Commodore 64 Add-On Keyboard 

Only the pTotot>T:>p (below) of this product was shown. It 
plugs into the cartridge slot of the 64 and should also work 
with the MAX when it comes. The connector is also a chassis 

for three extra 51D chips and some Parallel Interface 
Adapters (PIA). Coupled with the on-board SID of the 64. 
the combo will allow 12 voices to be played simultaneously. 

Paul Higginbotlom of Com- 
modore Canada is writing 
software for the keyboard 
that will allow you to as- 
sign voices lo pre-defined 
string, wind in^ruments 
and/or percussion ac- 
companiment. Pieces 
can be recorded into 
memory and you can 

play along with yuur 

own recordings or save 

them on disk tor later 

use. Recordings can 

also be played back in 

h different instrLment 

than they were re- 
corded in. Ten instnj- 
men! presets are 
built itito the pro- 
gram that can be al- 
tered to suit. The 
keys are not veloc- 
ity sensitive, but at 
S:^(H) US. (nncon- 
finiied), this pruii- 
uct is still a 
excellent deaL 
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Availability has been announced for Vlay S3 with a possible merely d^ached and the cord is re-routed to the VlCMo 
VIC-20 equivalent lo tollow. dem. 



CBM Speech Syn1hesi2eT 

This one also plugs inio the C64 caHridge slot, Cdpabillties 

include built-in software for direct speech output and 
phrase programming, recording, and playback- No avail- 
ability or price as yeL 

ISStTpnnter Plotter 

This was First shown at Comdex in '82 but displayed with 
more emphasis al CtS. It has four colours (red, green, blue 
and black) and uses reguiar paper up to about 6 inches v^ide. 
Print speed is 14 cps with a 0.2 mm. accuracy. Alpha-nu- 
meric output can be 20, 40. or 8() columns, and for 200 
buck?! US., it should do ok. Available now but expect back 
ordCTS. 

The HHC-4 

This is the "half product^ '^HHC" stands for Hand Held 

Computer. It has a full QWERTY keyboard (with keyword 
'"burst" keys], a numeric pad, comes with ^K of RAM, 
expandable to 12K. The machme is actually a Toshiba 
product with a Commodore label and looks a lot like llie one 
Radio Shack sells- Plumed into an Interface adapter, the 
HHC-4 can be connected lo a casseUe, dot matric printer. 
TV or jnoiiitor, and can even talk with ihe ViC-20 or C64. 
But the processor is slower than snail doo. Screen scrolling 

is abismai. Rumour is t^al Commodore will either replace 
the guts of the machine with Iheir own design or make a 
whole new one from scratch, but don't expect to see this one 
until it's improved- Once done, it would give the R,S- 
e^LiJvdlent a lot of Irouble, especially since CBM will un- 
doubtedly beat their price. 

Commcxiore Colour Monitor 

This has been around a while now. The $300 US. price tag 
makes it pretty attractive, especially with Ihe special "lumi- 
nance" input for use with the 64. Call your dealer for 
availability. 



The extra component for Canadian use is like a "Y" connec- 
tor made from Ma Bell style jacks. This plugs into Ihe 

VICModem. From there, one side goes to the telephone, the 
other to the wall outlet. 

Expect to see VICModems at your dealer sometime in the 

spring or summer. Price in Canada will be under $200. 




Dual Drives Take New Shape 

It may not tie long before CBM dual drives start appearing in 
a new housing. Quite simply, it looks like a VIC single drive 
housing, but double the width. Thus is pure speculation on 
my part - they could tie limited to European distribution. Is 
this the reason for the lO'lO shortage? 



The Commodore Space Shuttle? 

Not quite. . . maybe next year. But with over 60 complete 
Commodore systems at JFK Space Center, they certainly 
deserve mention. NASA oflicials estimate t^iat the systems 
in use have improved the overall efficiency ut their docu- 
mentation department by 5 fold. Other applications include 
equipment and employee [racking, job costing, status re- 
ports, and tracking hazardous waste matter lu ensure safety. 
Although not as dramatic as the Anik-C satellite and Spar's 
Canadarm. we thought you migtil like to know. 



* 



Turt>o 1541 From BMB CompuScience 



VICModems Come To Canada! 

Commodore has finally started producing the necessary 
ingredient tn make VICModems work in the 'great white 
north". Unlike Canada. U.S. telephone handsets are con- 
nected to the dial housing via a cord that can be unplugged 
from both pieces. This makes set-up simple. The handset is 



Turbo 1541 is a hardware interface for use with the VIC 15^1 1 
Singl*^ lH:^k Drive. Dejiign^d in overcome Ihe speed limita- 
tions of the serial bus. the Turbo \54\ ibd parallel interface 
that connects to the User Port. The other end is a PC board 
that plugs intf) Ihe microprocessor socket of the 1S41 drive, 
thus bypassing the serial bus altc^ether. 

Versions; will be available for hoth VfC-2n and Ihe Commo- 
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dore 64. The device is "software transparent" which means 
it will work with any software that performs filing operalions 
or dynamic loads from ihe 154 1 drive. Speed improvements 

approach that of the 4040 dual drive. Disconnect it and your 
1541 is back to normaUie. no permanent hardware moditi- 
cations required). 

Turbo 1541 should be available this summer at a price 
around $100. 



Light Pen From Madioon Computer 

Madison Computer's newest product is The Light Pen. 
designed lor use with ViC-20 and Commodore 64 coiiv 
puters. Unlilce other light pens, this one allows full use of 
your computer with the pen in operation. The Light Pen 
always knowswhere it is on Ihe screen- individual dols can 
be sheeted quickly without the need for blinking points. 

The pen connects via the joystick port and is housed in an 
attractive oak stand that also holds the intensity control dial. 
Between the pen and the stand is a lightweighl four foot cord 
to permit freedom of movement. The pen ilself contains a 
photo diode which detects the scanning signal on a TV set or 
monitor. 

Also includes is a complete manual and sample programs. 
For information, call or write: 

Madison Computer 
1825 f^onroe 
Madison. WI, 5371 1 
608 255 5552 

Another recent Madison product is The DeskTopper; an 
attractive oakstand for your VlC-20 or C64. It has nxim for 
one or two single drives, diskettes, manuals, and neatly 
hides that ugly mess of connector cables. Price: $49.95 US. 
plus shipping. 



PromQueen From Gloucester Computer Bus 

The PromQueen is a low-cost prugramnic^r^^ tfial lets the 
user write machine code programs and burn them into 
EPROMs quickly and easily. The VlC-20 version is available 
now (suggested retail $199 US.) with the C04 version well on 
its way, 4K of RAM is included thai allows for address 
dependent testing prior to burn-in. 

The package comes with Hexkit 1 .0; a software editor and 
debugging system. Machine code is usually regarded as very 



difficult to learn» requiring a long, arduous, and time -con- 
suming study process. Hexkit 1 .0 hplps relieve some of the 
pain and frustration often experienced when perfected ma- 
chine language programs. 

Other features include a lop quality zero insertion torce (ZIP) 
socket that will accept 2716, 2732, and 2732A EPROMs. 
PromQueen is double buffered to offer hill isolation from the 
host computer at the flick of a switch. The ZIF socket is also 
buffered, allowing gang programming of up to 10 EPROMs 
simultaneously. Il plugs right into a stock VlC-20i no addi- 
tional buppurt devices of power supply is required. 

For more inlormation, call: 

IBC Distribution Arbutus Total Soft 

4047 Cambte Sr. 4202 Meridian,. Suite 2U 

Vancouver, BC, V5Z 2X9 Bellingham. WA, 98226 

6048797812 2067330104 

Or: Wdlly Ralston 

Gloucester Computer Bus 

6 Brooks Rd, 
Gloucester, I^A, 01930 
€17 283 7719 



MIcrobufTer From PracHcal Peripherals 

Micrubuffer is aji intelligent interface card that fits between 
your computer and printer. It takes printer-intended data 
and stores it in its own :i2Knf memory, which is expandable 
to 256K. Microbuffer will accept this data as Jast as your 
machine can send it. While [he buffer is filling up, it 
simultaneoiLSly empties the data to your printer at its *ilower 
speed. Ouce all data has been sent, your computer is now 
available for further use. . . ie. no waiting for long program 
listings to finish printing before continuing with your next 
ta^ik. 

Microbuff0 will speed up any program lh;it requires print- 
ing. Once output is sent into its memor>', the data will trickle 
out to the printer while you set up for your next report. In 
most cases memory will not fill enrirely. If it should, upon 
receiving fhe trailing 32K (max 256K)of your report, control 
is released to the keyboard. Depending on printer speed, 
you could have up to an hour for working on non-printer 
operations. 

The rontrr^l panel includps a "pause" button, a "clear" 
button, and a "copy" button for duplicating memory con- 
tents from the last output. 
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Two versions arc available; one for RS-232 serial, another 
for Centronics parallel, making il compatible with Epson, 

Centronics, NEC, CJtoh, Qume, Diablo (CBM 8300P), Ana- 
dex, and IDS Paper Tigers. Prices start at S299 US. with 64K 
expansion modules at $1 79. Want more? Call: 

Practical Peripherals, Inc. 
^l24Slji Rays Drive 
Wesllake Village, CA, 91362 
213 991 8200 



Formasfer Diskette Diiplicatf>r9 

Are you a software distributor usins stacks oi dual floppies to 
make your disk duplicates? If you're delivering 8050 or 8250 
formal di^kette^. you know how long il takes to make a 
single copy. 

Formaster now offers an alternative. Their dual drive disk 

duplicators will copy up lo 326 disks per hour with the 

automatic loading option. On type 4040 disks, (hat's about 
1 1 seconds per copy' (20 s. for ftOf^O, 33 s. for 8250, a ratio of 
about 22:1) Features include ease of operation, error chectt- 
ing, and piracy protection. Call or write: 

Formaster 

2102 Ringwood Avenue 
SanJose,CA, 95131 
408942 1771 



Vedrix Hi-Rea Colour Graphics Machine 

The VertriM is an RS 232 device that fits between your 
computer and colour monitor {composite or RGB). Il comes 
in two models; the VX128 and VX3S4. Both machines offer a 
resolution of 672 x 480 indivicinally addressable pixels. The 
ijiteriidl processor is an Intel SOSSrunnini^ at 5 MHz with a 
pixel drawing lime of IGOO nanoseconds. Software features 
inrhirie point, line, arr, solid and pattern filled polygons in 
2D or 3D, Commands in 3D allow rotation, scaling, transla- 
tion, perspective, clipping, and viewport 

The VX128 has 128K of RAM, offering 3 bU planes for a total 
of 8 possible colours per pixel with 8 colours to choose from. 
Price: $1995 US. 

The VX384 has (gel this) 384K of RAM for a tolal of 9 bit 
planes. With 9 hil planes you have a possible 16,8 million 
(yes, million!) colours lo choose (rom. At any one time, one 
of 5 1 2 of these colours can be directed to cny pixel on the 
screen for Jruly superlative CRT graphics capabilities. This 



model has some extra commands: slant, magnification 
(zoom), and programmable character sets and spacing pa- 
rameters. The price is S3995.00 US. so tfiey're not for the 

average user. For more on both products: 

Vectrix Corporation 

700 Battleground Avenue 

Greensboro, NC, 27401 

800334 8181 

919272 3478 



Micrograph From International Micro Video 

Micrograph is a full featured intelligent ink plotter lor pre- 
senting breakdowns of statistical data in graphic form. Yuu 
simply enter the data, select the type of graph best suited, 
and choose the colours you want. Micrograph does the 
necessary calculations, sets the scales, and will even draw 
on film or acetate for overhead projector presentations. 

Graph types include Pie charts. Bar and Gatt graphs. Line 
graphs, and Rectangle charts in up to 8 different colours. 
Coniroliable plcrttmg capabilities are included for other 
types of output. Alpha-numerics are can be positioned 
anywhere on the drawing surface. For information: 

Internationa] Micro Video 
1 606 8th Street 
Niagara Falls, NYJ4305 
716 285 4855 



Pacific Coa«t Software C64 Pr<igrmnA 

Pacsod, a California custom programming firm for CBM 
equipment since 1980. is now retailing software forlheC64. 
Among them is a wordprocessor for £74,95, a programmers 

loolkii package for $69,95. an assembler tor S59.95. and a 

disk filing base system for $39.95. They also have several 
new games for the 64, 

Pacific Coast Software 
3220 S.Brea Canyon Road 
Diamond Bar, CA, 91765 
714 594 8210 



PetSpeed 64 Now Available 

PetSpeed, the compiler program for Commodore com- 
puters, is now available in a version fur the CO^. See your 
PetSpeed dealer for details. 
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Looking For Software? 



Advertising 



Thp Whole PET Caffllng has been available for !;everal 
moiuhs now. In it you'll find over 500 honest and indepen- 
dent reviews of soflware and hardware products for all 
Commodorp romptiters. If ynu'rp looking to arqnirp more 
soflware for your [nadiintb, dieck out lliis book. Althougti a 
particular program may nol be included in the reviews^ 
other similar packages might he there for comparison. 
CoiiLatityour dealer or call: 

Midnite Software Gazette TheTorpel 

635 Maple 381 Lawrence Ave- W. 

Mt. Zion. IL. 62549 Toronto, Ont.. M5M 1B9 

2178645:^20 41fi7S29252 



Access Telicion From Commodore Computers 

Batteries Included, a Toronto CBM dealer, is now carrying 
NORPAK videotex products that make Commodore com- 
puters compatible with the Telidon network 

The package actually enahb any micro to work with a 
decoder a^ a videotex grdphics display generator, thus 
offering an affordable allernative to the many expensive 
liardware systems required to connect with Telidon and 
oilier videotex [lelworks. 



Centralizing advertising and utilizing co-op funds will 
provide 30^ to 4056 discounts on radio, TV, etc, ICDA 
will help you combat the departmenl store campaigns. 

In the future, we will be offering many other new services: 
an 800 hot line for technical assistance, low cost insurance 
program, etc. 

We believe the Association can be self-sustaining with low 
yearly dues and an override on product sales. 

Charter men:±>erships are available for $25 now and guaran- 
teed annual dues of $75/year starling in March '83, All new 
members signing up after January '83 will pay J lOO/year. 

Memberships are restricted to Commodore dealers only and 

are not open to the mass merchandising retailers. For 

information: 

ICDA 

1774 N.Glassell Street 
Orange. CA. 92665 

714 9210230 



New Newspaper From ETI 



Batteries Included 
71 McCau I Street 
Toronto, On(.,M5T 2X7 
4165% 1405 



independent Commodore Dealers* Assoctatlon 

The ICDA was formed in October 1982 to assist Commodore 
dealers in two main areas with others to follow in coming 
months: 

Purchasing 

By utilizing central buying, the dealers will be able to 
purchase both hardware and software at considerable 
savings. Negoliaiions are now underway with monitor 
and card reader companies with expected savmgs of at 
least 50^, In the software area, an agreement has been 
signed with a data base company which will provide 
dealers with discounts approaching 70%. 



ETI Magazine, a well known world-wide electronics mag, is 
now publishing a newspaper called Teaching Electronics & 
Computing. As the name suggests, the tabloid is designed 
specifically with educational institutes in mind. The paper 
pnnts all the latesi news and events, experiences of other 
schools and teachers, plus lots of technical material that 
often has no copyright restrictions (good for classroom 

distributionj. 

Published 9 times per year for $12.00 Cdn.{S15 in the US.) 

If you're a teacher, it's FREE! (same for school boards). 

Teaching Electronics & Computing 
25 0verleaBlvd..Unit6 
Toronto, On!., M4H IBl 

416 423 3262 
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Bits and Pieces 



Got some interesting bit of info you'd tike to share?. . . a 
POKE, a screen dozzier, a neat trick, or some other anom- 
aly? Send it in^ We 'if he gfad to print it! Ed 



The Transactor? 

Since Ihe release of our latest "new format' Transactor, 
we've had a lot of new interest from a lot of different 
people,, , . and for different reasons. But it seems that out of 
the queslions most often asked is, "Why is il called The 
Transaclor?". 

Back in the olden days, Commodore's ver>' first micro to hil 
the market, as most of yai will remember was called the 
PET; an acronym for Perso[t(il Eleciruriiu Trarisaclor. Also, 
the word "transactor" was defined in a dictionary some- 
whpre (that esrapps my rerol lection) as "a vehicle or device 
for transferring information from one place tu another". This 
was also the basis of our new masthead, designed to repre- 
sent outward motion from a centre, but retain the familiar 
border that's llie same shape as the stickers pui on early 
machines. 

So. influenced by these Iwo facts, the name 'The Transac- 
tor' was created. Bat enough nostalgic reminiscing and 
sentimental menrorahilia. let's have some fim. 



FTOIJTSM 



The name, ahhough rather hard to classify as an acronym. 



,1- 



means "For Those Of Us That Smoke M "■ We'll let 

you fill in tlie blank. This shon one-liner, by Benny Fruden 
ot Wayne, Pennsylvania, should get an award for variety of 

display. 

I c=32:forn = l to 41 : c= 192-c : for a = Oto n ; 
forb = 32768 + ato347fi8fitepn ■ poke b, c r next b. a, n 

After entering RUN, the program will appear to do noth- 
ing , , but don't hit your STOP key. . . it just needs to warm 
up. Once it i^eis going 1 think you1! agree. . , "not bad for a 
one-liner, eh?" 

The proi^ram could be sped up slitihlly by substituting the 
literal numerics for variables which would be initialized on 
line 0. In fact, any BASIC program on any Commodore 
machine will run faster by using floating point variables to 
represent your constants {integer variables are not as fast*). 
When BASIC runs into a literal numeric such as *"32768". it 

must first interpret each character and then convert it to 

floating point in the "Floating Point Accumulator" (see any 
memory map). During this, time is also spent on error 
checking. (* Integer variables aren't as fast because they also 
need to be converted to floating point) But BASIC just loves 
floating point variables Thevalueislookedupin the simple 
Vdriables table, transferred into Itie F.P, Accumulator, and 
ejtecution proceeds. Not only that, but if the same constant 
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is used in several places, you'll save on memory too. For a 
good example, see Paul Hi^inbollom's Un- Assembler pro- 
gram in Volume 4. Issue '01. Due to the nature of his 
program, Paul defines nearly every variable at tht start 
which improves the run-time considerably. 

Getting back lo our one-liner. . . it's wriHen for the 8032 so 
4032, VIC-20» and 64 users will need to make changes. 

4032 ; change 34768 to 337C8. 
VIC-20 : change 32768 to 4096 or 7680* and 
Change 33768 to 4602 or 8186" 

* use second value with 8K (or more) memory expanders. 
C64 : change 32768 (o 1024 and 
change 34768 10 2024 



Mind Twister / Brain Bender 

This one will dazzle you! It's the handywork of John Stove- 
ken in Milton Ontario. In fad. don't look at it too long or 

your grey matter will turn three shades of purple-ish orange 
and ooz out your nose onto your keyboard, and make a real 
mess. 

The program simply fills the screen with characters and 
then starts playing with the Upper/Lower case register at 
decimal 594G8- By tapping any key. Upper/Lower case 
mode is toggled at different rates. . . 256 in all! Hit a "1" to 

end the routine. 

The program, like some others we've presented here in Bits 
&Pleces, is so fast that the video beam can't keep up with 
the changing display, Ihus producing the truly weird effttts. 

It's designed to work on 8032's; BASIC 2.0 and Fat Forty 
users will have no trouble making it work, bul llie resull^ 
will differ. VIC-2Ci and C64 users will, once again, need 
Changes: two lo the screen start and end addresses and 

another for the Upper/Lower case conlrol register (59468 on 
PET/CBMs). The code is relocatable so it will work wherever 
you have memory. 

The BA^ loader that follows is all you need to gel it going 
(or rather all jt needs lo get you going). KUN it and enter. 

SYS 20480 

The number 'l* shown in bold on line 30 is Ihe base 
character used lo fill the screen. For different effects, try 
changing this to 193,223. 255. or your choice. You "need- 
-to-know-what-makes-it-tick" niachiLie cudt addicts will 
find the source code following the loader. 



10forj = 

20 data 

30 data 

40 data 

50 data 

60 data 

70 data 

SO data 

90 data 



20480 to 20539 : read x : poke i, x : next : end 
169.128,133, 1,169. 0.133, 
]^^.\m. M45, 0.2O0J92, 
208,247,230, 1,165, 1,201, 136 
208,239.169, 12,141. 76,232.173 
76.232. 73, 2,141. 76. 232 J 65 
151,201.255,240, 7,201, 49,208 
1. 96.198, 2,166, 2.202,208 
253. 76. 31, 80 



loop 
sta 



loop2 



next 

lop 
lop] 



Ida 
sta 
Ida 

sta 
tay 
Ida 

(500).y 

Iny 

cpy 
bne 
inc 

Ida 
cmp 
b[ie 
Ida 

sta 

Ida 
eor 
sta 
Ida 

cmp 
beq 
cmp 
bne 

m 

dec 
Idx 
dex 

bne 



S5000 

'$80 

SOI 

'$00 

SCO 



: screen start 



'$01 ibascchar. 



'$00 

loop 

$01 

$01 

'$8fi 

bop 

'$0c 

$p84r 

$e84c 

'$02 

$e84c 

$97 

'$rf 

lop 

'$31 

next 

$02 
$02 



; screen fulP 



;set graphic 

itoggle to 
;text mode 

;key pressed? 

;no, do delay 

;yes, is it a I? 
;no. change delay 
yes, end 
:alter delay 

:and do one 



jmp 

.end 



lopl 

Ioop2 



Loading CG4 Programs On PET/CBMs 

BASIC programs in PET/CBMs commonly start at $0401. 
But C64 BASIC programs start at memory location $0801 
(remember, there is always a 'zero" in the byie preceding 
BASIC text space). So Commodore, in Iheir infinite wisdom, 
decided that Ihe fi4 would have the capability to re-locate 
PET/CBM protjrams They LOAD righl where llie 64 wants 
them with all chain pointers adjusted perfectly. 
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^0I so in llie reverse siiuaiion! PET/CBMs didn't know there 
wasgoingtobeaC64, , .so programs written on the 64 will 
LOAD into the PET at address 50801 . YUK! 

There are actually two solutions to this one. First, we could 

move Ihe S(art-o"f-BASIC pointer in the PET "up"' t^ ^<^**^^' 
Then a zero must be placed at SOSOO to keep the operating 

system happy, A UST would display your program ok, but 

SAVE or DSAVE would reep havoc! On PET/CBMs. SAVE 

always starts ai $0401. This would store IK of "fore-junk" 

belore reaching the start of the actual pr<^ram. Take this file 

over to the 64 and il wiil try and ioad this fore-junk leaving 

memory full of organized hodgepodge. The only way 

around it is to use the M.LMonitor to store the program 

from the PET. which is also painful because we need tn finf^ 

the end-of-prc^ram address for the -S command. 

So forget all this. . . here's a much easier way (thanks to 

James Whitewood, Miilon Ontario); 



1. Type NEW <RETURM> 

2. LOAD the C64 program inio your PET/CBM, 
A "LIST' at this point should result in "READY. 

3. Add Ihe following line of BASIC: 



IT 



Orem 



4. Now enter: 



<RETURN> 



poke 1026. 8 <RETURN> 

5. Delete line by typing a and <RETURN> 
6- Type "LIST' and your program will be there! 



Slep 5 deletes Line 0, The PET treats Ihis like any other 
delete. The space occupied by Line is reclaimed by moving 

the Lines above clown. Iwe i) is effectively "sqiiep^ed out". 
Bui since Line was the first Line, the new first Line will be 
that of the 64 program. Presto! The 64 prc^ram is right 
where the PRT/CRM is most comfortable with it. 

Wouldn't it be nice if everything were so simple? 



Cheating A Syntax Error 

If you're extreiwiy lazy like me, you pjobably take any 
chance to make programming more effortless. For example. 
Jhr^ ^\ IN command is three entire key presses followed hy a 
Return. And you don't always hit them tighl. How many of 
you have entered ■^RU1N'\ "'RUB" or "RUM'\ Argh! Right? 

Well fellow short -cullers. Wayue Garvin of Toruntu has this 
one for us. The keys Shift and RUN/STOP do the auto LOAD 
and RUN sequence. Some machines want to load from disk, 
others from tape, but every machine, back to the original 
PET, has this feature. 

But try this! Type a letter (eg. ")C') and then hit Sliift-RUN/ 
STOP. A ?Syntax Error will resuh and the LOAD is ignored. 
However, the characters R-U-N and Return are still in the 
keyboard buffer. These will be lioiioLiied as if YOU eiilt^red 
them, and your programs begins! 

Just don't hit a number key first or the LOAD command will 
be entered on a program line which might mutilate existing 
code. 



A brief explanation. In Step 1, the PET thinks no program 
exists because the first thing in memory is an end-of-BASIC 
markerll consecutive zeroes). 



This little trick is convenient., it means Til sec my program 
errors that much faster. 



Step 2 loads the 64 program into the PET and sets the 
End-Of-BASIC/jo^mer. PET now thinks a program exists in 
memory, but the end marker is still down at S0401, so UST 
will never get past this point. 

In Step 3, all memory between $0401 and the End-Of-BA- 
SIC pointer (which is pointing at the end of the 64 program) 

is moved up to make room for "0 rem". 

The forward chain pointer for Line is now pointing at 
S0407, the end marker. The first b\xe of The 54 prot^ram now 
lies at $0807. By altering oniy the high order byte of the 
chain pointer (Step 4), Line is "linked" to the program 
residing at $0807. The low order byte need not be adjusted 
since it will be the same. 



More Key Combos 

If you have an 8032, S096 or a SupcrPET, you've probably 
used the'*:" key to pause scrolling when LISTing a program 
oraCdtdbii. Try this. LIST a program and hit the":" key; the 
listing stops at the bottom of the screen. Now, wilh your 
forefinger on the ":''. use your pinky lo press the RUI^/STOP 
key; scrollini^ resumes. To paui^e, release RUN/STOP; to 
abort, release the ";". 

Another I use often is '^Shift, RVS, A &L", Hit Shift first, then 
RVS, and press the A and L keys together. This combination 
does a lir>e insert. . .handyforinserting lines into programs 
visually. The screen will scroll duwji frujii the cursor line 
and you fill in the gap. 
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Out Of Memory Error? 

IOsosub20 
20 goto 10 

Thp pmhlprn is nhviniis. As line 10 calls line 20. line 20 
ruuiei lo line 10. and around we go again. The "return' 
information placed on Ihc stack by Gosub never gels re- 
moved. As more and more piles up, eventually (he stack 

overflows and the ?Oul Of Memory Error is displayed. 

FOR-NEXT loops will also do it to you. If you start a 
FOR-NEXT loop and lump out of the loop with GOTO, 
ir\formalion is left on the slack waiting for the NEXT stale- 
menl to cnwe along and use it. H another loop is opened, 
this information gel pushed (arttier down the slack and will 
probably not be removed. This is the beginning of a mess. 

There are. however, a couple of buili-in safeguards. If the 
loop is within a subrouline, a RETURN will strip off the 
NEXT information as well. Likewise, if you exit a loop, but 
use the same loop variabte to open a new one. Ihe old 
"NEXT ' information will be removed. 

Of course nobody wriies programs like this but if you gel the 
?Out Of Memory Error and FRE(0) indicates plenty of room 
available, check your loops and GOSUBs. 



Stack (Crackle) Pop! 

The following SYS's will ''crackle" your stack and cause a 
POP. Apple users will know all about the POP command. It's 
used to remove one level of subroutine RETURN informa- 
lion- However this POP simulator removes ALL levels of 
subroutine returns. 

r 

A particularly useful application is within an Input Subrou- 
rine. You may have a linethat detects a certain characler(eg 
"@") thai exits the Input routine and transfers control to a 
Command Input routine. Further, the Command routine 
might testfora special character and exit to a Menu rouline. 

Bui, jumping out of subroutines wilh GOTO can be hazard- 
ous (as discussed in the previous section). By using one of 

these 5YS's. ihe stack is all cleaned up and potential slack 

overflow is prevented- 



BASIC 1 .0 
BASIC 2.0 
BASIC 4.0 
VIC 20 
C64 



sys 50568 
sys 50583 
sys 46610 
sys 50544 
sys 42352 



II you jusl wan: to POP a smgle return, code up 7 PLA 
instructions followed by an RTS and SYS to that. The above 
sys's are much safer though. Any open loops will interfere 

with a single POP and may cause adverse side effects. 



Universal Reset 

Instead of switching off your computer next time you want 

to Clear out memory, etc, try this SYS- It does the same Ihing 
without that nasty power intermption. 

sys peek(65532) 4 256 • peek(ffi533) 

This works not only on all Commodore machines, but any 
machine that uses the B502 as its mk^Toprocessor. The 6502 
pre-de(ines addresses 65532 ($fffc) and 65533 (Ifffd) as Ihe 
locations that will contain the address of the machines reset 

routine. 

When you "power up", the 6502 docs a "JMP Indirect" to 
£FFFC. This is known as the Hardware Reset Vector, The 
HRV will change from machine to machine. Use the above 
statement for universality; use these when you want to reset 
from a particular machine: 



BASIC 1 .0 
BASIC 2.0 
BASIC 4,0 

VIC 20 
C54 



sys 64824 (Sf{f38) 
sys64721 (Sfcdl) 
sys 64790 (ifdl6) 
sys61S02 (Sfd22) 
sys 64738 tMce2) 



Vertical Messages 



Want lo print a siring vertically instead of the same old 
horizontal way7 Kasy with the windowing feature of 8032 
type and Fat 40 machines. 




some string- : ssS 




10 input' ^Hsome string : ssa 

20 ai = ssS : go^ub 1 000 : prini ssS 

30 goto 10 
1 000 print: print tab (rndi 
5000 prim "^\left$("" 

len(a£)); ' 

5010 return 

The two ''Cursor Home" characters in line 10 clear any 
existing window. KSS is transferred to AS to make the 
subroutine more versatile. 

Line 1(H)0 can be removed. It merely TABs a random 
amount across the screen tor the demonstration. 
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Line 50U0 setsa window one column wide and as high as A$ 
is long. The routine leaves the cursor at the bottom of the 
window. Upon returning. SS$ is printed and neatly scrolls 
inlo place. For one column wmdowsahe scrolling is so fast 

you*II never notice it. 

The special characters in line 500O are actiieved using ttw 
sequence of ESCape and RVS. After typing (he quote, ESC 
litms quote mode off, RVS enters reverse field mode, and 
ttie-tetter "o' (Set Top character) is pressed. However, you're 
still in reverse mode; hil Shift RVS to get out. Same goes for 
' (Set Botlom). Try this program: 




100 a*- 



no prinl'B'; :remt48 ='s 

120 a = rnd(Q^48:i^r nd(Q)-80 

1-10 ?laWi)"B''lell$(' 

'M"lfflEfaa.a1: , rem T 24 down's^ \ right 
140 print spc(24 + a/2)'H";:goTol20 



HM'hUM'l'I'I'I'HfiN'^M'I'I'J' 



\a) 



Pretty useless, eh? 



Ejtcape Without Escape 

The ESC (Escape) key is jound on Commodore machines 
wilh bjsiness keyboards only. On some earlier machines it 
does absolutely nothing. On later machines with BASIC 4.0, 
it serves to cancel "quotas mode^'; invoked when an odd 
number of quote keys ( ' } have been pressed. 

However, quotes mode is also invoiced when a odd number 
of quotes are PRiNTed to the screen (eg. PRINT CHRS(34);). 
This can be rather offensive in an Input Subroutine, espe- 
cially when you don't want to disable the quote key. After 
the user hits the - ke>, any cursor keys pressed will be 
displayed in their reverse field or "programmed" represen- 
tation. To disable this mode, the user must either hil the ESC 
key (if there is one) or type another quote and DELete it. 
What a pain. 

The following POKEs will cancel quotes mode The POKE 
could be placed after a test for the quote key: 

get a$ 

ifa$ = chr$(34) then poke. .. 

. . .or, more simply, executed after every key press: 

get a$ : poke. . . 



Here are Ihe POKEs you'll Jieed depending on your ma- 
chine: 

BASIC LO : poke 234, 
BASIC 2.0 : poke 205, 
BASIC 4.0: poke 205, 
VIC 20 : poke 2 12,0 
064 : poke 212,0 

If for some reason you waul to turn tiuute mode on, jusi 
POKE the respective location wilh a 1 . 



Shift Key Detect 

This program will deled if Hit: Shift key is depressed. 

100 if peek(l 52) then print "shift key down' 

101 pnnt'sthflkey up" ;golo KJO 

And VniJ say. "so whatrV Well, rhe Shift key has one 
advantage over other keys in iIml eiu character is entered in 
the keyttoard buffer lo interfere with your GET and INPUT 
commands As part of a piece of software its uses are limited 
(Superscript uses llie Shift key to speed up scrolliEiy through 
text and output to video). But of even greater significance is 
during program developmeni. Such a statement could be 
used to re-diretl execulion. lest validities, charige variables, 
or even alter machine conditions such as tolling Upper/ 
l/)wercaseorSTOP key disabled/enabled. Kor example: 

2000 print "Press's' to Save Record" 

2010 N = rnrgasiiblf)00O:getaS:ifaS = "" then 2010 

2020 ifa$<> "s" then return 

2030 record *8, rn 

2040 print *8. rnS 

2050 . . . 

lOOOO if peek (1 S2) Ihen print x; 
10010 llpeek(152)lhen 10010 
10020 return 

Of course any amount ol information could be transferred to 
subroutine lOOOO, By using a common variable to receive 
data (ie. "x"y the subroutine remains versatile and can be 
called from elsewhere in your program. 

Line 10010 is a loop that waits for the Shift key to be 

released. If you hil "Shift" and nothing happens, you've 
probably pressed it during this linc^ release and try ^ain. 

This merely demonstrates a techni<4ue. It could be i[ujcli 
more sophisticated than shown. One improvement might 
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be the adUiiion c^ cursor posilion store & restore subrojtirc 
calls at Ihe beginning and end of this "pseudo- monitor" (see 
Jim Butterfield's Cursor Position Recorder this issue). Varia- 
bles could ttien be displayed on. say, the top or bollom line 
of the screen where ihcy won't disturb other screen con- 
tents. Then thp cursor would be sent back lo its previous 
position to retain noriLial program appearance. 

Once again, Ihe main PEEK will depend on: 



BASIC 1 .0 
BASIC 2.0 
BASIC 4.0 
VIC 20 
C64 



peek (516] 
peek (! 52) 
peek (1 52) 
peek (653) 
peek (653) 



In all cases, if the above PEEK yields a zero, the Shift key is 
up. othervtise down. 

Other possibilities for 'PRINT X," in line 10000: 

poke 59468, 26-peek[59468) ;flip case (pet/cbm) 
poke 144, 173-peek(144) ;slop en/disable (4.0) 
poke 1 44 , 9:i-peek(l 44) :stop en/disable (2,0) 
poke 537,260-peek(537) .slop en/disable (1.0) 



SuperPETs With Hard DItfks 

When using the SuperPRT. the language disk is usually in 
drive 1 ofyour floppy. From the SuperPET menu, by simply 
entering the first letter of the language (ie. ^V for API., "b"^ 
for BASIC, etc), the system goes off to drive 1 lo begin 
loading. 

But if you have just added a Commodore 9060 or 9090 Hard 
Disk, you may have noticed there is no drive 1 . only drive 0, 
Now you must enter language load commands manually. 
Synta^c is: 

disk/O.APL 
Of coarse, "APU' could be any language by choke. 



The Petunia plugged on at the PET User Port. Video lines 
are on the top edge and the User Fort lines are on the 
IxHloiii. On the VIC and 64 the User Port lincsare still on the 
bmtom edge, but video signal line^ are now routed to a 
connector all their own. Where the video out (pin 2) used to 
be on the PET User Porl. is now t 5 votts on Ihe ViC/C64 
User Port. If the Petunia "video in" is connected lo +5 volts 
it will try like a banana! 

Now. you ask, "How does a banana fry?". .. plug your 
Petunia into your VIC and you'll find out! 



Supermon 64 Correction 

In the January issue of COIvlPUTE!, Jim Bullerliehls 
Supermon 64 was published with one slii^hl error that will 
throw a wrench into Ihe works. 

Al Ihe end of the BASIC listing are three pokes. The middle 
one should be POKE 45. 235 (not .232). 

Also, Dave Berezowski of Commodore Canada suggests this 
mud to be included at the beginning of the program: 

IKAe 53281. 12 

The poke sets the background colour to grey which looks 
much nicer than the blue background from power-up 



Petunia Uaers Beware! 

Back around 1978/79. an interface for PET/CBMs was 

released called "The Petunia", ll combines an active digital 
to analog converter and a video interface for connecting to 
external monitors. The imit works very well on PET/CBMs, 
but don't use them on your VIC ur 04! 




Dave Berezowski oiCommodorp Canada 

Chart or Standard Business Procedures 

On the next two pages lies our inlerpretation of an age old 
comic. We felt it was time for an update. 
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Drats' Cursf^s! Shapings' How many times hooe these words, 
entered conLersalions between you and YOUR computer? 

Found a bus ^^^^ others should know about, or a potential 

programming hazard to avoid? This section is an extemior\ 
of Bits and Pieces designed to deal specifically with bugs in 
ROM and RAM, and temporary solutions. Meivs ofpermo- 
nent ROM fixes from CS/W tviti also be reported here. Ed^ 



Looks Are Deceiving! 

How may syntax errors can you find in Ihis line- 

ifgorbXandforinlhend = storLin:header ' disk * ,dl .Ifn 

Some are rather obvious bui don't be fooled. . . oiher parts 
will run [inc. 

The problem is a result of "tokenizing'\ When you hit 
Return to enter a line of text, the BASIC editor begins 
analyzing or parsing the line (from left to right) looking [or 

patterns that matcti pre-defined keywords in ROM. If a 

match is made, the editor converts the sequence mto a 
number or "token". Tokens are used not only to save 
memory (ie. keywords consume only one byle) but also for 
speed. During execution. BASIC need only inlerpret a single 
hyie instead of string of 2 to 7 characters long. 

The first is probably the most difficult to spot. The sequence 
G OR B will correctly calculate G OR^d with B. until Ihe 

spaces are removed! Now it effectively becomes GO RB. Yes, 



"GO" is acually defined as a keyword that doesn't do 

anything, unless you like putting spaces in your GOTOs (ie. 
GO TO). To honour the spaced out "GO TO". Commodore 
had to include GO Ir the keyword table. Otherwise "00"^ 

would be considered a variable during execution, followed 
by the keyword *'T0", and a ?Syntax Error would result. 
Such was the case In the original BASIC 1 .0, All BASICS from 
2,0 on incorporated this change. 

Two rules here: 1. Don't use GO for a variable, and; B. If the 
variable G precedes the boolean operator OR. follow G with 
a space or enclose ii in brackets. 

The remaining gotchas have been discussed in earlier 
Transactors, but are worth re-mentioning. 

This next one is easy. T AND F will read as TAN DF. Since 
there is no open bracket for the vari^ihle DP, ?SynIax Rrror 
occurs- Once again, follow T with a space or put it In 
brackets. 

The same thins will happen on FOR and INT until we use 
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spaces 10 separate: 



was Ihe 1 540. The only dillerence is one KUM chip. 



. . .t and for in . . . 

is how this part must read to work. 

"THEN" is processed next so END wiii not be detected. Thus 
no space is needed before the variable D. Howe\'er, good 
programmers will insert one anyways for tidiness. 

After the " = " comes STO RUN. which is of course meaning- 
less For this to work at all, it must be entered as: ST OR UN 

Ourlastsyntaxerror lies in the HE.\DER command. The 'T' 
delimiter for the disk ID is followed by an "F", This to- 

kenjzes to "IF" and is definitely out of place. Inserting a 
space after the I will avoid TSyntax Error, but "FN" is nov*' 
tokenized as if it were part of a "DEF FN'' sequence. Your 
disk ID will now be a space and the graphic character D. 
which has a PET ASCII value of 165, the same value as the 
token for "FN", Solulion: A. Don't use F as the first character 
Ota disk ID. and; 2. Don'i use a pair of characters that match 
a keyword. These die FN. GO. IF, ON, OR, TO, or ? (PRINT 
shorthand). 

The statement has one more problem in general that often 
plagues even the most experienced programmers- At first 
glance, the condition appears to be: 

IS g or b greater than t and f or In 

Not so! The > symbol Is actually curdling on the variables 
B and T. To achieve Ihe above test, brackets must be used 1o 
delimit the >: 

if{gorb)>(landf orinjthen. ,, 



If you have added a 1 540 to your VlC-20, upgrade ROMs are 

available Irom your dealer, but there will be no change in 
operation. However, if you are planning to get a C64 (or just 
got one) your 1540 will be incompalible for program loads. 
Fear not though. While you're waitmg for your new chip, 
here is a temporary fix: 

poke 53265. 11 :load "your program" .8:polw)a265. 27 

The first POKE turns off ihe 64"s screen, h seems that the 
651 Q uses about 2^ % of its processing time servicing the VIC 
II video chip, mainly due to the extra features (ie. sprites. 
etc.) which the VlC-20 doesn't have. The 1 540 delivers bits 
at the rate of about one every 20 ms. The <J4 uses up more 
time servicing the screen than the character Is available for. 
Therefore, some bits are lost. With the screen off there's no 

problem. After the program loads, the second ^OKH turns 
video back on. 

Only input is affected. File data read with INPUT" and GET* 
will suffer the same horrible fate. Writing data is ok though. 
The 15'tO has no trouble keeping up with bits offered by 
SAVE and PKINI"' because they're .slowed down by the 
screen. With the screen off. SAVE would be much faster 
(maybe too fast?). 

Basicly. (or rather machine languagely) the 1541 ROf^ is 
2S% slower than the 1540. This means the 64 can continue 
with video and still service the disk You 11 notice program 
LOADs are a little sbwer but I think the tradeoff Is worth- 
while. The new VIC (l chip has some very powerful features 
and we'll be covering them in detail in the next issue. The 
1 525 Printer is also subject to this problem. The new version 
for the 64 will be known as the 1525E 



You may even require brackets within brackets to ensure 
correct order of operations. Don't be afraid to use a few extra 
brackets. , , the lime you save later will be well worth the 
extra b)1cs! 



The remaining info came from Commodore Canada 's tech- 

nkal deportment. 1 have to f^and it to them... Commodore's 
rare poficy of releasing preconous facts atjout their ma- 
diineSy affords them an admirable image that their competi- 
tors all too often choose to forfeit. 

Incompatibility ism a: Cti4 

Commodore is now shipping 1541 VIC Single Disk Drives 
(or use with the VIC-20s and Commodore. It's predecesMjr 



More Incompatibility isms: Disk 

One other note. . . di-ikettes (ormalted on the 154G, Ihe 
1 54 1 , Ihe 203 1 . Ihe 4040 (3040 iti Europe) or, if there's any 
still around. Ihe 2040, can all be read by from any of these 
models. But don't write "interchangeably''. That mears if 
you have a 1 540 disk and you insert it in a 1541 (or a 4040, 
elc), you can read it but don't write on it! Some say ihey 
haven't experienced any prohlems with thi?; hut there have 
also be reports of diskette dobberaiiun, t make It a habit to 
have oneof each format on hand sol can pick up programs 
from any drive. Then I copy them onto my 4040 later on. 

The same is true with 8050 diskettes on the 8250 drives. 
One difference though. . .upon first inserting the disk in Ihe 
drive, your initial access will give an error (eg. Catalog). 
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Clear the error channel with PRINT DS$ and give ihe 
Cataloti command a^ain. You should have no funher trou- 
ble unJil you insert another disk. Bui once again, don't write 
on them. Instead, format a new 8250 diskette and use COPY 
to transfer 8050 Program and Sequential files across. H you 
hove Relalivc filcs> you'll need to use a utility to make ihe 
transfer because REL files are formatted differently on the 
8250, (Jim Burierfield's COPY-ALL will do it) 



lMO/41 Command Chan lie 

All Commodore disk units support the Memory-Write com- 
mand- This command works like a "disk POKE" for writing 
data into DOS memory- On 2040, 4040, 3040, 2031 , 80S0, 
8250, 9060 and 9090 drives the syntax is:" m-w: " (followed 

by an address and data, see your disk manual for details). 

Syntax on 1540 and 1541 drives is:' m-w' (ie- without (he 
colon). 

This commQnd is not to be used haphazardly. Memory- 
-Write deposits data in DOS memory that may or may not 
send it into never-nevertand. 



VlC-20 Printer Output Bug 

If a program is IJSTed to the 1525 printer from the VIC'20 
immediately after a SAVE to tape, the 1 525 will drop charac- 
ters. For example: 

"beige tint" might become "big rl , . .hmm. poor choice 

Well, you gel Ihe point. The fiy? Simfrfe After the SAVE, type 
the following: 

VERIFY <RetLirn> <RUN;ST0P> 

It seems that activating the VERIFY command clears the 
adverse condition created by SAVE. RUN/STOP aborts the 
VERIFY and you can now send unbuqulaied listings to your 
printer. 

Alternately, you could LIST your program before SAVE. 
After the SAVE, a LOAD will untangle the output routines 
like VERIFY. 



No InK^rlace On VIC U Chip» 

Some televisions on the market have what's called "inter- 
laced CRT scan". This means that (he video beam scans all 

the et;e/Trastersduring one sweep, then goes back and scans 



all the odd rasters on the next sweep- Other TVs simply scan 
consecutive rasiers. 

VIC-20 video chips have a feature called "interlaced mode"- 
To activate it: 

poke 36864. 133 

poke 36864. 5 de-activates it 

If your picture appears to "flutter", try the above POKE. It 
may or may not help. Note that game cartridges from 
VIC-1910 up, with one exception, allow you to tojigle this 
feature by hitting the F7 key before the game is started. The 
exception is "Gorf (VIC-1 923). With this cartridge, push the 
joystick up iiiMead of hitliny F7. 

Back to the point, . , The Commodore 64 uses a new video 
chip called the VIC IL This chip doesn't have the interlace 

mode (eature. Although this is not a bug, it was included in 
this section because it might look like one. If it happens to 

you. I'm afraid you're stuck. Huwevtr, tlie 64 has pretty 
good video output. Chances are you won't notice it even if 

you have a TV with interlaced scanning. 



Zenith TV Mod 

On some recent Model 3 Zenith TVs there is a problem with 

the vertical hold synchronization. This not only affects the 
20 and the G4, but virtually any device used locally to drive 
it (ie, other micros, video games, VCRs, etc.}. The picture 
will, once again, appear to "flutter"^ because Zenith factory 
sets Ihe unit to receive its vertical sync (or interlace) signal 
"off air", (the signal is mixed in by the station — you may 

have heard the buzzletters "V-l-P" used to promote this 

product) 

The POKE discussed in ttie previous segment can be used to 
fix it,butonly for VIC 20s. However, Zenitti offers this Jiiore 
permanent lix: 

Inside the Model 3 lits a yellow wire on connector 2H of 
module 9-152. Disconnecting this v^re will force the se\ to 

generate its own internal sync signal. This might seen 
simple enough, but have a dealer or qualified technician do 
it for you. Your warranty won't be voided, nor will you 
notice any change during regular TV viewing (most TVs like 
Sony don't even use off-air sync). 

Note: There is a white wire connected next to the yellow 
wire which should NOT be disconnected. This problem has 
been observed on other Zeniths and some RCAs but no 
specific model numbers or fixes are available at this time. 
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Cnmniodf>rp 64 Bugs Update 

Here is a list o( all known 64 bugs to date: 

L TABaiidSPC 

The PRINT* command cannot be followed directly by a TAB 
or SPC operator. To set around this, simply precede TAB or 
SPC with two quotes or a "iilerai null string"*. Eg. 

open 4,^ 

prim'*4. " tatKl 0) ■ some string " 

2, Prompt Suppress Alter COIVT 

[f a program is interrupted with the RUN/STOP key, and 
CONT is entered to resume execution, the prompt messages 

generated by the operating system will no longer be sup- 
pressed. For example, if yoj have CONTinued a program 
and a dynamic LOAD occurs, le: 

100 load "next module \8) 

the prompt, "searching (or next module' will be displayed 
on your screen. This one is really no big deal so there's no 
fix. although b POKE to location 19 l>efore using CONT 
might do the trick. 

3. Screen Editor Crash 

This one was found pretty early and you may have already 

heard about it. Let's say you"re on the 23rd> 24th. or 25th 

line of the screen and you type a line that's longer than 80 
character but less than 120. If you now begin deleting 
characters, upon deleting the SOlh character (DELcte from 
column I ol the 3rd line around to column 40 of the 2nd 
line), your machine will appear to hang. 

Apparently, upon writing a space to this location, the 04 
incorrectly writes information outside of the colour table. 

This info actually sets written to CIA 1 which is just above 

the colour table ($DC0O). If a certain bit is set, CLA 1 will 
invoke an auto LOAD/RUN (as if you hit Shift RUN/STOP}. 
This bit will be set or unset deoending on the colour of your 
cursor. At this point, your keyboard will seem Eo be dis- 
abled. 

Fear not! Here is the fix (thanks to Dave Foster of Richmond 
Hill, Out). If the "9" and the "h" keys are depressed together 
and then released, the prompt "PRESS PLAY ON TAPE" will 
appear. Do so and the screen will display "OK" and go 
blank. Now press the RUN/STOP key and you will regain 
control of your 64 with no apparent ill effects, {Note for disk 



users with no Dataselte: connecting the cassette port pins 1 
and 6. the outside pins, together will have the sameetlect as 
pressing PLAY) 

To avoid this potential situation aliogether. simply change 
the cursor colour to while (usually best), purple, green, 
orange, brown, grey2. or bright green. 



New Kernal ROIW For 64 

Commodore has been installing new Kernal ROMi in their 

latest production G4s. Dubbed the *'Kernal 2'\ it fixes bug '1 
from above (and maybe '2 but not "'6] and also incorporates 
some changes- However, it's already been discontinued in 
lieu of a *'Kernal 3" ROM coming soon. Rumour has it that 
Kernal 2 machines will be updated lo Kernal 3. but Kernal I 
machines will have to waiL Ttie leaioii lor this is a change 
in Kernal 2 that was made too late for it to be effective. 
Kernal 3 will revert back to the original method used in 
Kernal 1. 

The change in point is this. A "Screen C^lear" with Kernal 1 
resulted only in the screen being written with space charac- 
ters. The colour table was left untouched which means any 
subsequent POKE to the screen wnuld produre a charader 
in the previous c-olour assigned to the location being 
POKEd. 

Kernal 2 works the sauje way as the VIC 20. Cluaring llie 
screen causes the entire contents of the colour table lo be 
written with the same value as the background colour Now, 
a POKE anywhere to the screen will produce a character 
that is the same colour as the background. Thus it will 
appear to be "not there". 

Had Commodore released the original Kernal 1 C64 with the 
VlC-30 clear screen procedure, Ihere would be no need for a 
Kernal 3. Keriial 2 renders several 64 prugrains already in 
circulation inoperative afteraclear screen (WordPro3+ 64 
lor one). This may be a bles,sing in disguise though since 
new bugs have been discovered since Llie release of Kernal 
2. 

Other cliajjges iLi Kernal 2/3 iiiclude a siigliily dllferent 
operation oftheCommodorelj^go key when LOADing from 
tape. In Kernal Katape LOAD would cause the tape deck to 
find the program and wait indefinitely fLjr the Lugo key lobe 
pressed before proceeding. This gives you the option of 
aborting the LOAD by hilling RUN/STOP With Kf^rnal 2/3. 
ibe 64 wails 10 seconds for you lo hit the Lugo key once the 
prc^ram is found- After 10 seconds. LOAD proceeds as if 
you did hit Logo. 
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To check for Kcrnal 2, enter the following line: 



prim B" : i^ peek(55296) = peek(5328l)+240 thea 
prinrKemal2- 

Tune in lo this section nexi issue for more news on Kernal 3. 

Additional changes arc expected. 



Bc^t Monitor Picture From VEC/64 

Here are Ihe pin designations for llie 5 pin Video/Audio 
connector on VIC 20s and C64s. The colours arc (hose of the 
Radio Shack 5 pin European plug lo 4 phono jack cable 
(Pan* 42-2394). 



VIC 20 

1 Red +5V@ lOma, 

2 No Lead Ground 

3 Grey Audeo Out 

4 Black Video Low 

5 White Video Hi 



C64 

Luminance 

Gronnd 

Audeo Out 

Video, 

SID Audio In 



If yod have ci VIC 20 and a B&W or colour monitor, try 
connecting pin 4 (Video Low) or pin 5 (\'ideo Hi) to your 
monitor input. Whichever gives you the best picture will 
obviously be the one to use. 

Commodore 64 users wilh video monitors have a couple of 
options available. For colour monitors, get yourself a phono 
"Y" adaplpr from Radir^ Shack. To this ronnpct Lnminancp 
{pin 1 , Red) AND Video (pin 4. Black) and plug the Y-adap- 
ter into your monitor. You should get a much sharper 
picture than wilh jusl Video alone. 

For 64s with B5W monitors, connect just Luminance (pin 1 , 
Red) to ihe monitor inpjt. Video seems to give a "grainy" 
picture but Luminance comes through nice 'n' clear! 

DON'T however try either of these wit fi your VIC 20 You'll 
be conneaing + 5 volts to your monitor and you could be in 
for a spark show! 

One last [KJle. , , new64sartf coming soon that will have dii 
8 pin Video/Audio jack. No details yet on the extra 3 pins, 
tut well keep you posted. 




Cartridge 
Slot 



Modulator Aud^of Video 

Output for TV Connector 



Ser/3/ Port 
for Printer 
and /or Disk Drive 



Cassette 
Port 



User^rt 

for Modem and 

Telecomputing 
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This SGCtion, although hopefuUy not regular, will cover 
publication ertfyts and /or improoements for preimm Tran*i- 
ac/o/s. // you find a significant mistake in an article or 
program, please let us know so we can pass it on. Ed. 



Indistln^ishab 'Va 

Pir5i off. I'd Uke to nieatjuji tlidt we're working on the 
problem of distinguishing lower case Us from the number 1 
in prograrr listings, etc. For now ttiough. a lower ra«* I. will 
have a "flat" lop, ancj the lop of a I is cut at a slight angle. 
Usually it's nol hard to tell which is which merely by where 
they ocair But 1 admit, there are some dubious cases. 
Please bear witli us until [le^t issue. 



Blu and Pieces 



Vol4l9SlPfl6. 



As It turns out, SiiperPRT Cohol is not free to existing 
SiiperPET owners. I'm not dear whether it's Included with 
new SuperPET purchases, but ask your dealer for details. 



Line 8^1 should read, if mn$(mn)<>' " {ie, null siring) 

r 

i 

The first pass (to get the file length) is needlessly slow - 

certainly not in kcepirg with the rest of ihe program. To 
overcome this, Tve added a little machine code to speed it 

up. The main changes are: 

I . Extra DATA Siatements 

116 data 169, 0,162. 4J49. 95,202, 16.251, 

169,160,133, 94,162. 2, 32,198,255 

117data230, 98,208. 10,230, 97.208, 6.230, 

96,208, 2,230, 95, 32,228.255,165 

lis data 150,240.235. 32,204,255.198, 94, 6, 

98, 38. 97, 38, 96, 38. 95. 16,244. 96 

Line 110: change 654 to 709. 



Disk Un- Assembler 



VoMIsalPgta 



Paul Blair of Holder. Australia writes in with these correc- 
tions and additions: 

"The f^ul Hii^inLx)ltom unassembler is very good indeed, 
despite the minor problems with the listing. The most 
important fixes are: 

Line 120selsAL=251;Une 121 setsAl=0, 

Tfiis problem stems from our L^sus. / ■? problem. 

Line 809 should read, if ds then . (not dd) 



The m/c is nol original - it appears in several other utilities 
and seemed appropriate for this one. 

2. BASIC Changes 

Add ■": gosub 9700" to the end of line 30 1 

Add 9700 open 1 5. 8. 15: a = 0: poke 1, 143: poke 2, 2: 

a = a + Lisr(0):e = s + a:close2 : close 15: return 

Add 3011 print "("le-s+l/byles)" 



Delete line 3021 
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Filing It 



Vol4 1002 Pg3 1 . VIC Modem Driver 



Vol4ls9irg46, 



Two " + " symbols weni astray from Jim's articie due lo a 

lypeseller translate oversight. On page 31. left column, 
there are two lines containing rhe sequence, ' 3*45*6", one 
around 13 lines from the top, tlie other about 33 down. 
Insert the plus signs between the 4 and the 5. (How many 
thought ilshnnid bp"3--45-fi'\ besides you Jim) 

AIsp, page 31. right column. Line 130 should read; 



Move the "next" in line 300 to a new line (ie. 305 next] 

Also, for some reason the ''return" on line 310 causes a 

?Retum Without Gosub Error. We don*! know why, it just 

does (any ideas someone?). To get it working; 

Change 100 to: 1 00 goto 200 
Changc310to:310golollO 



130lFST = 0GOTOM0(not 1100) 



Si^erPET Terminal Program 



Voi4[»slPg32. 



The "tables that follow'*, didn't follow. Here they are: 



C64 Preliminary Review 



VoM Tfls2 Pg48. 



The article mentions two Digital to Analog converters in the 

6526. These are actually in ihe SID chip, rot the CIA. 
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STOP airs 
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The WordPro 

Book Of Tricks 



Focus on Deleting and Erasing Functions 

Because many of the users of WordPro coiil<l be firsl time 
users of any word processing system, we will address, in this 

issue, some of Ihe very basic functions in lexl editing, 

mainly erasing and deleting. There aclualty is a difference 
between the iwn "dpleting" fimctiDns ufiuftiiy fp^tiit in the 
text "wrapping" on the screen, while "erasing" functions 
leave behind a space of some l<ind. 

Most WtjidPro users will quickly discover that lliere are 
often several ways to do (he same thing. In this issue we will 
have a closer look at the various ways of deleting. Perhaps 
ihere will be some new shortcut you haven't yet tried. 

Command Summary for ''Deleting" Functions 

1. Control + d + w + <Return> 

2- Conirol t- d + s -t- <Renirn> 



3- Control - INST/DPI^delelesanenhrelinf^; 



4- Spaccbar-Pressinglhcspacetjarinthemiddieof text will 
replace any typed characrers with spares This is a neces- 
sar>' leature because it allows for corrections to be made 
by "sinking over". 



Donna Green 
Commodore Canada 




5. Relurn Key - Used only at end of paragraphs and short 
lines such as headings. When pressed in the Jiuddie of a 
line of typing the rest of that line will be deleted. This is a 
quick and easy way to revise the end of a paragraph, and 
a vtry logical function when you realize liiat a carriage 
return is always the last key pressed at the end of a 
paragraph. 

Note: A Shifted Return will return the cursor to the line 
tietow, [o column one. and will not erase the rest of the 
line! 



1. Deleting Characlers, One at a Time 

(a)Oirsor Position - Move one character to the righl of 
character to be deleted, 

(b) Command - See Step 1 . above. Press the INST/DEL key 

once for every diaracier to be deleted. 

(c) Caution ^ Walch Ihe screen to avoid deleting more lext 
than required. If text inadveriently "wraps ' up to the lire 
at>ove insert enough spaces to force it to 'Vrap" down to 
the prnppr line below. This would probably only happen 
if many characters were being deleled at that time, in 
which case probably the method below would be bettor 
tofoltowfordeletingseveral words or sentences. 
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Note: A "Space" is considered a "Charact<*r" and may be 
hisened or tieleied like a regular letter or number! 



2, Deleting Complete Words 



deleted. 

(b) Command - First define the paragraph^ or amount of text 
to be deleted, by setting a "range". To "set a range". 
follow the steps below: 



(a) Cursor Position - Move to beginning of word /sentence to 

be deleted. Cursor may be on thefirsi character of word 
lo be deleted or on the space preceding Ehe word to be 
deleted. 

(b) Command To Delete a Word - Sec Slcp I , above. Press: 
■■Control"^ + -r -*- ^V'ihen<Reiurn> 

(c) Command To Delete a Sentence - See Slep 2. above. 
Press: 



Press: Control + r(range) 
Press: "cursor down" key 
Press: "cursor down" key again 



Press: Return key 

Press: Control + e(erase 
4- Iflinesin range) 



entire line will be tiigh- 
lij^hted 

next line will be high- 
lighted 

until entire paragraph is 
higti lighted 
to freeze the paragraph in 

memory 
entire para. w91 
delete from screen 



Tonlrol" + "d" + "s"then<Relum> 

Note: The letters V" or V may be pressed more than one 
time, and even combined if several words or sentences are 
TO be deleted at once, e-g. 

Control + d4-w4-s + s-i-w4w + then <Return> 

This would deiclc one word, two sentences, and two more 
words of the next sentence. 



5. Deleting Paragraphs - Leaving a Blank Space 

r ~ 

(a) Cursor Position - Anywhere on the first line to be 
deleted. 

(b) Command - See Step 4. above. The Return key will erase 
a line of text and leave a 'L" on the screen where the 

Return is pressed. 



6, Deleting An Indented Area 



3. Deleting Paragraphs - One Line at a Time 

This method is rather slow if large amounts of text are to be 
deleted, but ideal ifonly a few lines are involved. 

(a) Cursor Position - Anywhere on the first line lo be 
deleted. 

(b) Command - See Step 3, above. Press Control then the 
INSTyDEL once for every line to t>e deleted. 

{Don't forget that the "C for ''Control" mode is still high- 
lighted on the status line, so press the control key a second 
time to turn off "Contror', before continuing with any 
editing.) 



Example - A document has twen typed with all paragraphs 
indented 5 spaces {example below). Now it has been decided 
to remove all indented areas, 

WordPro 4 Plus offers an exceptional text editing including 
every entering, editing, memory, and printing feature con- 
sidered important to sophisticated word processing. *- 

Method One 

U) Cursor Position - On the first letter in the sentence, on 
the letter "W" in WordPro, in this example 

(b) Command -Press the "INST/DEL" key once for every 
"^ace" lo be renrwved, until the Itrller "W" b dt tulumii 
one. 



4. Deleting Paragraphs - By Setting a Range 



Method T wo 



This method is quicker If larse amounts o\ text are to be (a) Cursor Position - On the space preceding the first letter 

deleted. in the sentence and type a period - example; 

(a) Cursor Position - Anywhere on the first line to be .WordPro 4 Plus offers an exceptional text editing 



Ihm %*cmuictor 



17 



lonunry 1983 



including every entering, editing, memory, and print- 
ing feature considered important to sophislicaled 
word proceising.*- 

(b) Cursor Re-Position - Move cursor back to column one 

on the same line - and give Ihe cummaad lo delete a 
sentence, (The system recogm2eE a "sentence" as every- 
thing up to a "period^'!) 

(c) Command -Press "Control" 4 "d" + "s" + <Relurn> 

The text will move lo Ihc left. Individual spaces may be 
deleted simply by pressing the INST/DEL key. 



(d) Repeat - For the remaining items in the column. 



9. Joining Two Paragraphs Together 

Using the method descfil>ed above where an "end of sen- 
tence" or a period is typed at the beginning of a sentence, 
the chore of joining two paragraphs together becomes a 
simple iobk. 

Step I - Insert a space and type a period h)efore the first 
clididcLer in die second paidgraph, iji this exdiELplt:, the "1" 
in the word "It" in paragraph 2. 



7. E>eletiDg Indented Areas (Moving Columns Left) 

Example - A list of items has been typed all begiEiiiJiig at 
column 15 (example below). Mow it has been decided to 
move the list of items over to column one. 

house*- 
boat^ 
car^ 
cottager- 



Example: 

WordPro 4 Phis offers an exceptional text editing, 
document storage, and typewriter quality printing 
capability lo any business whose needs would benefit 
from ttie increased productivity inherent to word 
processing--^ 

.11 includes every entering, editing, memory and print- 
ing Feature considered important to sophisticated 
wordprocessing,*- 



(a) Cursor Position -On the first letter uf the word (tlieletlt^r Step 2 - Cursor up one line and delele the blank line 

"h'Mn house, in this examplel (Control + INST/DEL) 

(b) Command -Pre&s the 'INST/DEL* key once for every StepS-Cursorupagain.audpositior] cursor ojie^jpace after 

"space" to be removed, until the letter "W" is at column the period (right on the carriage return symbol (the '^' 

one. character). 



(c) Repeat - For the remaining items in the column. 



8. Deleting An Indent Faster 



Step 'I - Used the spacebar to remove the carriage return 
symbol then give command to delele a sentence. Press 
Control + d(ddete) + s(seiUence) and Returji, - The iwu 
sentences now become one paragraph! 



(a} Cursor Position - On the space prtxediag the lirst letter 

in the sentence and type a period - example: 10, E>e]etlng Files From The Diskette 



.house"^ 

.boat*- 

.car^ 

xoEtdiie'^ 

(b) Cursor Re-Posilion - Move cursor back to column one 

on the first line - and give the command to delele a 
sentence. (The system recognizes a "sentence" as eve^y■ 

thmgup loa'pcriod'l) 



To the relief ol many first lime word processing operators, 
deleting WordPro files accidently from the disk is impos- 
sible. R^'lfjw is the command: 

Control + .(period) + s(scratch} + [file name] + <Relurn> 

Recall the Directory lo see that the name of the file no longer 
exists (Control > or 1 and return). 



(c) Command -Press "Comrol" - "d" + "s" + <Relurn> That^s all for now! More next time. 



TheTraniacter 



2B 



January 1 963 



Bulletin Board Numbers 



"BulleHn Boarding" should be classified as another national pasfime. Below 
is a list of Bulletin Board phone numbers in the Toronto area alone. We 
would like lo make the list nioreinlernational. so if you're nit»ninga hoard or 
know the nunibefs in your area, plea^seiid lliein in. From time to lime we'll 
publish the list when enough additions or changes warrant doing so. 

This first Itsl was compiled by Richdtd Bradley, Sysop of ihe NORTEC BBS. 






Bulletin Board 



Operating Hrs. Number 



New Number 



NORTFr BBS • 24 Hours 

PSl-WordPro * 7pm-9am 

TPUG • 7:30pm-9am. . , , 

RTC BBS • 5pm-9am 

Atari Info-System 24 Hours 

Apple-Can 24 Hours 

ETl Bull BBS 5pm-9em 

Infoport 24 Hours 

Toronto Net-Works 1 24 Hours 445-6696 

Torumo Net-Woiki 2 24 Hours 

THUG Tpni-Tam 231-4174 

RCPM 1 24 Hours 231-9538 

RCPM 2 24 Hours 231-1262 

iBMPC BBS 24 Hours 499-7023 

OSBOARD 626-8066 



487-2593 
624-5431 
223-2625 
884-6198 
622-2462 
447-S458 
423-3265 
278-3267 



(* = Commodore Ea^ed System) 



Area Code is 4 1 6 for all numbers 



The numbers for THUG and OSBOARD may have changed by the time you read this. 

Check witti another board for an update before trying these iwo numbers. 

The Toronto Nei-Works 2 number has been omitted. To get this number requires a cail to 
Toronto Net- Works 1. 



I' 
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The MANAGER Column 



John Stoveken 
Milton, Ont. 
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MANAGER Users Uniter 

Jusl to let you know that you are not atone, (here are 
approximately 6000 MANAGER users ttiroughout Itie 
world. The software has been in many different environ- 
menis, and here are a few that we have t>een informed of. 

The World Water Ski Championships have been scored 
and reported with The MANAGER for the last two years. 
Racti national team had their event points totaled and ttien 
reported with the slatiddid package. 



The United States Navy tafi been using The MANAGER in 
their shipyards to irdtk Ihe rewurUng of their ships in diy 
dock. The Philadelphia shipyard was the first to implement 
Ihe software. 

Speaking of navies, the Royal Navy had a PET on the 
airrraft carrier HERMES that wa^ used to keep track of 
Argeuiiiie prisunei^ during tl^t? Fdukidiids crisis. 

The Roihman Cup Horse Jumping Championships were 
scored and all stall, feed and veterinarian fees were billed 
using The MANAGER last summer. 



The Cleveland Police Department tracks all their viola- 
tions and arrests with The MANAGER. 

Where else is The MANAGER used? We know of many 
applications in churches, manufacturing schcduNng and 
inventories (do you know thai paint ingredients are priced 
to hundredths of a cenO^ administration and laboratories. If 
you have an interesting application that you are using The 
MANAGER for we would like to publish it here. 



ARITHMETIC Goodies. . • 

When calculating averages it is important to determine 
whether a number has been entered into the field or not. 
Thls is because the math will sum a blank field as zero and 

this can shift the average to zero. The solution to this 
dilemma is to use a register as a counter like this. . . 

F5/F5TORI ;ifF5 is or blank then Rl -0 

; otherwise Rl = 1 

Rl +R3TOR3 :sum The number of entries 
F5 + R2 TO R2 ;accumulate the value of F5 
R2/R3 TO 2D1 ^display the average with 2 decimal digits 



Educational Software for the PET'CBM that is available in In 5ome applications a fixed numeric rale may t>e associated 
Canada, U.S.A., W. Germany, Israel and in the U.K. has all with a file, or a math operation may l>e optional depending 
been recorded on The MAMAGER. on some condition. In an invoicing scheme we have a case 
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where individual ilem prices [nu5l be summed (1)^ then a 
hourly rale may be applied to Ihe invoice (2), and then a 
fixed tax applied depending on the users status (3). 

We can then imagine a data file where fields (data types) 5. 7 
and 9 are item prices, lieid 10 is the number of hours 
charged, and Tield 1 1 a tax tixeniptiij[& immbei. Nuw, {x^'ui^ 
The MANAGER math: 



F5-hF6+F7TORl 
27.5 TO R2 



F10»R2 + R1TOR1 



F11/F11-1T0R3 



R3'.07*R1TOR4 



0-R4TO2D1 

R1-R4T0 2D2 



;suni the lineitems(!) 

;place the hourly rate in a register 

:note that it is not carried 

;in the data record 

icalculate the hourly charge 

;anddddittot]ietotal(2) 

;divLde llie exentptiuii iLuniber, 

the result 

;is -I it there is no number and rt 

;is if the number has been 

entered 

:places in R4 if there is a lax 

;exemplion number, or places the 

;-7%inR4taxiftaxable(3) 

:displaythetax 

;display the total bill 



REPORT GENERATE Goodies 

The report packagf^ of The MANAGFR, when Integrated 
wilti llie bOTi option gives you auctss to a very powerful 
"control break" report package, This allows you to group 
your data logically arnl to produce logically separate reports 
fioju one ddia file LJi o[iestep. 

For example, if we have an Accounts Receivable file that has 
one entry for each receipt that curtains the customer i.d., 
account classLfication, amount owed and invoice date, we 
can reportthedatainseveral different formats If we sort (he 
file by date dJid report only the nun-^eru aniuuut owed, we 
can produce an aged receivables listing instantly. 

A control break reporl will allow us tu produce irnlividual 
invoice sheets for each customer in the file in one pass. All 
that i?; required is to first sort the file with Ihpcnstnmeri d.as 
the primary key. the account class as the second key and the 
invoice date as the third. When we report using this pointer 
file we will have then grouped all the records first by 
customer^ the[i bill type (capital, service, consulting) and 
finally by date. 



The print conditions should then specify that the -I- break 
be on the custonjer with paging, and that the -2- level break 
be by account type with linefeeds. The resultant report vtill 
then have each customer listed uii a separate slieet of paper 
and this can be sent directly to him to inspire prompt 
payment. 



Back To BASIC 

The screen dump routines (\d) and special print routines 
(\p) in The MANAGRR refer to two memory locations to 
determine the printer type and it's IEEE device number. 
These two locations are: 

address 22527: 1 2 = CBM matrix printer 

14 = ASCII printer 



address 397 



4 = default printer device number 

5 or other optional 



While doing cunlrol break reports, there are times when you 
may want to print just subtotals and totals, not the individ- 
ual line items. This can he done by "rem-ing" line 1910 in 
tlie program 'generate2'\ Before you remove the hne do 
make sure that it reads: 

]910\p,IJ:cl$; 



Forgotten Backslashes 

Last month we forgot to mention one "backslash" command 
that Is one of the BASIC extensions in The MANAGER. The 
missing command is ^he machine code save command. It is 
used to save any region of memory to disk (the screen, for 
example) for later recall with a \l;"name'' command. The 
syntax of the save is: 

\5/ name". -Stan" /'end" 

with Ihe 5tart and end addresses given in heitadecimal. For 

example, to save a MANAGER screen we would use the 
command: 

\s/®0:name.scr' / 6500".' 7dff" 

, . .sincescreen layouts are stored in memory from J6500lo 
tTdff. 

That's all for now. See vou here next issue. 
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The Four-Poke 
Screen Marker 



Have you cvcrwantcd lo pick up a fixed place on the screen, 
and write something thpie? 

Yoi] can do it with cursor movemerts. of course. Home the 
cursor and count down and across a given number of 
locations. That's often the best way , . . ii works without 
change on all Commodore machines .. PET, CBM. VIC, and 
64- Provided, of course, (hat you don't try logo lo column %0 

on a VIC, 

Sometimes it's very useful lo be able to mark your place on 

the screen - something like a bookmark - go somewhere 
else, and then come back to pick up where you left off- 1 call 
this sort of thing a "marker "program; it keep5 your place for 
yoL. 

How does the computer know where things are k^t on the 
screen^ It uses four locations: 

PNT - two bytes pointing to the memory address where 

the screen line sians; 
PNTR - one byte indicating where the cursor is on that line; 
TBLX - one byte giving the line number. This is used only 

when you go Co the next line, where TBUC will be 

recalculated. 



Jim Butterfield 
Toronto, Ont. 



Now - If we save these four bytes, wc can put them back at 
any time and the screen will immediately pick up its former 
position. We've got a marker! 

There's a fifth possible loratbn that might nr might not be 
usehii. It's called LNMX and tells you how big the line is - 40 
or 80 columns or whatever. Usually, you won't need it; but 
we'll note that it's there. 

Let's look at where these control bytes are kept in the 
various Commodore m:ichines: 





Original 


Other 


VIC/C64 




ROM PET 


PET/CBM 




PNT 


224 & 225 


196 & 197 


209&210 


PNTR 


226 


19g 


211 


TBLX 


2A5 


216 


214 


LNMX 


242 


213 


213 



So how do we use alUhis? l-et's try a simple prc^ram to print 

prime numbers. We will print the number we are working 
on at the top of the screen, and each prime, as we find il. in a 
continuous stream. 
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The first llnpdeppnflson your type of syslem If you have 
dn antique PET, complete wilh tiny keyt>oard and origi- 
naJ ROM set, you'il type: 

100 s0 = 224 : si =225 : s2 = 226 : s3 = 245 
it you have a more recent PET or CBM, you'll want: 

100s0=196:sl = 197:s2=198;s3=216 
Finally, the Vk or Commodore 64 will need: 

IOOsO=209:sl=2IO:s2 = 21! s3=214 

On lo our main program: 

110 print dir$(147) 

120 forj-5tol900stcp2 

(we'll start aur liit of primes at 5) 

130 mO=peek(s0) 
140 ml=peek(sl) 
150 ni2 = peek(s2) 
160 m3=pee^s3) 

(mark our place) 

170 print chr$(19);strS(3l;' "; 

(prim the number under lest} 

180 pokesO.mO 
190 pokesl.ml 
200 pukes2,jn2 
210 pokes3.m3 

(restore to the marker) 

220 for k - 3 to sqrO) + ,5 step 2 

230 q=j/k 

240 ifq = inl(q)gotu300 

250 next k 

260 print i: 

300 nexlj 



A lew notes: CHKt(l47) clear the screen and CHRS(19) 
homes the cursor. We don't need to use the fifth value, 
LNMX, because we dor't change it. (notice the semicolon at 
the end of line 170? Thai meanslhat we only print a partial 
line and then go back where we came from). If we did 
extensive printing at line 1 70 - or dropped the semicolon - 
the program would start to get confused between 
40-column and 80-column lines and might do the wrong 
thing. 

Thlsisn'l an optimal prime number generator, but it works .. 



and we can see the two screen areas moving at the same 
time. 

Summary 

Using four (maybe five) PEEKs and POKL^, we cati easily 
generate a "marker" that allows us to move somewhere else 

on the screen and then return, 

We could keep sevwal markers, of course. And ils our 

option: we don't have to return if we dent want to. 
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Determining Screen Size 



Chris Siebenmann 
Toronto, Ont. 



The program below shows my approach to ihe problem oi 
deletmitnijg screen size l<jriui:hlhi]igi as gamest and ulility 
loaders (eg. a loader for a word processor). IT IS NOT A 
COMPLETt: FKUCJRAM. Il is a subroutine wjtti three enlry 
points. To use it you (ack it on the end of your program and 
add the appropriate JSR. 

How To Use It 

First, add It to your program. As written it is completely 
relocatable* so you can pul H anywhere. After a JSR tu the 
appropriate entry point, the screen size is returned in the -Y 

register (or 128), and a completion code is returned in X 
Note ihat the value in X is non-zero when ihere has been 
an error and, on exit, the status is set to the value in .X so 
you can test it immediately by Ihe code: 

JSR entry 
Br^E error 
STY slen .screen len 

The error code that is returned in .X has the tollowmg 
values. If ills 1 thentheprogram hasn't been able to find the 
character which it put on Ihe screen. This shouldn't occur, 

but it protjably means lhat the screen pointer is pointing to 
the wrong area in memory (if youVe used DETENT}- If X is 



2 then the program has found the wrong characler in 
memory. The probable cause is from using the wrong eiilr>' 
point (VICENT on a PET or vice versa). 

The enlry point that you will use depends on the type uf 
equipment you want Ihe program to run on. If your program 
will never be loaded on a PET. then you need only use 
VICENV, and vice versa. I usually use both, as this allows me 
to test for either type of equipment. Thus I use the code: 



JSR 


peteni 


BNE 


onvic 


STY 


slen 


LDA 


'0 


STA 


pelvic 


JMP 


cont 


onvic JSR 


vkenl 


BNE 


error 


STY 


slen 


LDA 


•1 


STA 


pet vie 


con 





i 



Where "pelvic ' is a location which telts me which compuler 
Tmon, 
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How It Works 

This is one o( ihree lechniques [ know of for deternining 
screen size. The first is a ROM PEEK, chancy and must be 
changed every lime Commodore issues a new ROM set. 
Another is screen overlap. Basically this relies on the fact 
that there is an extra copy of the screen (IK above $8000 on 
40 columns) and therefore will nnt work on the VIC. This 
method is universal (as lon^ as the Stan of the screen is 
known, hence the VIC entry point) and will even work on 
8032's that have been modiJied by a 40 column shifler 
utility. U works by printing a characjer one line down (using 
cursor down) and then trying to find it in screen memory. 



lasting One: Source Code, 



petent 



vkent 



detent 



Bilering This Program 

To emerfhi<; program you can either type in the assembly 
listing (P5. it's in PAL formalj or the hex dump (listing (wo). 
The hex dump can be put anywhere and all you have to do 
is remember the appropriate entry address(s). When Slart 
equals the start of the program; 

PETENT i Slart 
VICENT , Slant 4 
DETENT ^ Start* 9 

In siiininHy-,ttiOf3ettiis routine helps you as much as it has 
helped me. 



Determine screen size for PET arid VIC 

- uses all registers. Clears window on 

80 column but will not affe<:t 40 cohimn shifter 

-X holds completiun code 

i everything OK 

1 i can't find char within 127 of start 
2\ found wrojig char 

,Y holds screen size 

• ;entryforPET 

da '$80 ;hi order of screen addr ($8000) 

bne vice[tt?3 ;skips to load ,Y with 



Ida 1288 
;(S288 i screen 
Idy *0 



J 
tax 

isr 

Ida 

isr 

jsr 

Ida 

jsr 

Ida 

jsr 

Ida 

isr 



Ida 
pha 
Ida 2 
pha 



iffcc 

*19 

$ffd2 

$ftd2 

"147 

$ffd2 

*17 

$ffd2 

iffd2 
1 



;enIryforVlC 

;loads higfi byte of screen addr, 
pageontlieVlC) 

;and now load the lo byte 

;on entry, screej] addr in .A & .Y 
;save A reg 

:restored3fanlt I/O devices (fe. screen} 
preset screen controller window 
;by printing cursor home 
:twice 

; cleat screen 

;do a cursor down 

;the char we're going to look for 



;save (0) - we're going to 
:useitasa pc«nter 
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• * 



detlDop 



dett^ 



detsize 



sty 


1 


:now set the pointer 


stx 


2 




Idy 


-1 


;now we're set 


Ida 


(i)y 


;get the character 


cmp 


*32 


;is it a space? 


bne 


dettesi 


;no - test it 


iny 




:yes- prepare for next rharspc 


bpl 


delloup 


;[iave we done this loo many times? 


pla 




;yes - restore $0001 and $0002 


sta 


2 




pla 




■ 


sta 


1 




Idx 


'1 


;rettirn error code*l 


rts 




;and finisli 


1 

cmp 


*^H 


:istherharactr jiisl fnund'ir"' 


beq 


deisize 


;yes - weVe got the screen size 


pla 




;no - restore 1 &2 


sFa 


2 




pla 






sta 


1 




Idx 


*2 


;and return with error *2 


Its 




'- 


1 

pla 




:weVe go! the size in Y 


sta 


2 


;reslore 1 & 2 


pla 






sta 


1 




Idd 


*147 


;lidy up Ijy ciearijii^ M:reen 


jsr 


iHd2 




Idx 


'i) 


jeturnlheallOK 


rts 




;screen len in .V 



Listing Two: Hex Dump. 



Editor's Note 



lOOO 


a9 


80 


cO 


03 


ad 


88 


02 


aO 


1 008 


0(1 


aa 


2i) 


cc 


ff 


a9 


i:i 


20 


1010 


d2 


ff 


20 


iJ2 


ff 


a9 


93 


20 


1018 


d2 


ff 


a9 


11 


20 


d2 


ff 


a9 


1 020 


■Mi 


20 


d2 


ff 


a5 


01 


4« 


a5 


1028 


02 


48 


84 


01 


86 


02 


aO 


01 


1030 


bl 


01 


c9 


20 


dO 


Oc 


c8 


10 


io:is 


f7 


58 


85 


02 


68 


85 


1)1 


a2 


1040 


01 


60 


c9 


30 


fO 


09 


68 


85 


lO-IS 


03 


68 


85 


01 


a2 


02 


60 


68 


1050 


85 


1)2 


68 


85 


01 


a9 


93 


20 


1058 


d2 


ff 


d2 


00 


60 


XX. 


XJt 


XX 



The Commodore M uses locations and 1 to do bank switctiing, This routine on the 61 might cause some adverse side 
effects. To avfHd potential murk, change tlie routine's use of locations 1 A 2 to, say, 9H ($62) & 99 ($fi3) (Floating Point 
Accuniuldlui). Vuu^lldibouet^ddJLoUierciJtjy poi[tt(ie. L64aU) luadjjbt Lhif ^atcu ^arl address. . . see your jneinory [Udp. 
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Computer Technology 



Robert Lovefoce rs Coordinator of Computer Applkations and 
Development ai Sheridan Coffegp of Applied Arts and Technol- 
ogy in Oakuilii^. Ontario. Thefolhwingi^ftfeuijenerforanoifier 
regular Transactor column that will documeni the experiments 
and results of hardware and software activuies at the posr- 
diphr^Q level at Sheridan, 



Training in ihe microcomputer field lakes several forms at 
Shpridan College The two dislioci orienlaMons are business 
(laid |jrot:ewiiiH and electronic computer technology. Micro- 
computer Management and Computer Science Technology 
provide Iraining lor alt aspects nf the husiness computing field. 
The courses In Electronics Technology and Moocompuier 
Technician emphasize machine level activity inc]u<ting design 
and interfacing skills. This traditional approach lo computing 
cducalion, ihe separation of hardware and Mjftware, is being 
enhanced with the addition of a new pr<^ram in the Schocl of 
Applied Science and Technology. '^ Microcomputer Applica- 
tions" is a post diploma program for graduates o( computer 
science or computer science technology courses at universities 
and colleges. 

Pruyrammers upon demonstrating their prtrficiency in high 
level and machine or assembly level programming will be 
instmcted in all aspects of electronics, microcomputer architec- 
ture, interfacing and systems design. The goal of this program is 
to provide industry with a tunctional member of the design 
team who will fill th^ gap beI\^■een the hardware and software 
experts. Industry advisors from Mitel, Litton, BMB Compus- 
cience, Bell Northern. Ed Agncw Assoc, and others have 
contributed significanlly to the goals and cunicutum of this 
prograjn. 

My intent is to wander through the courseware of this new 
program to expose to you some of Us more inteteslJns aspects. 
We will take a peek in several different labs on campus to 
investigate the uses of microcomputers in technical education 
and engineering. Some of the topics we will examine include 
CAIprogramsin electronics and assembler programming. Digi- 
tal electronics, Telidon, building your own microcomputer 
trainer, Sheridan's custom CBM interface breadboarding sys- 
tem, our development lab and computer graphics will be 
discussed aN well Hupefiilly there will be a balance of hard- 
ware, software and philosophy in this coverage. This column 
could be the s(arl ol an inlormation exchange for hobbyists and 
teachers of computer technology with your help. 

il appears that Sheridan Codeine has made a commitment to 
Commodore microcomputers and people often ask why. The 



Robert Lovelace 
Georgetown, Ont. 



answer, Wliy ijo!?Tliere are two sound reasoatter this; first the 
hardware and second the software. 

Entry level prc^ramming skills are best developed using a 
hands-on type of inslruclior. This m^ans that to expose the 
largest number ol students lo computers, an institution needs a 
great number of machines unless time is scheduled through the 
evenings. Commodores rhree for two dea! lo educational insti- 
lutioMS nidkeb tliis possible and most low end personal com- 
puters perform equally well in this instructional mofje. ft is 
essential lo expose students to other systems but ihis should 
only occur after some proficiency ti<is been developed on one 
type. In the early stages a reduction in the number of variables 
will Improve ttie learning experience. 

The architecture of the machine allows for many inleresling 
avenues of experiaitial learning. The built in user port, the 
IEEE— 188 interface, the cassette ports and the memoiy expan- 
sion port give the user easy access to the real world. Tape 
recorders, slide projectors, analytical Instruments can all be 
connected to the PET *ith minimal hardware and programmed 
in BASIC. Now matti teachers can study number systems 
dynamically and interactively using lights on Ihe lines of ihe 
iiser port. Physics teachers can time physical events with Ihe 
built in limer, and electronics testing can be automated with 
iEEE-4S8 compatible instruments. Jim Butterfjelds IBE£ Watch 
is an example of a simple teshng program that allows you io 
observe the activity on the IEEE bus. 

One of the best software resources available is the Toronto PET 
Users Group and their library of public domain software. At 
their meetings you will find some of tfie most knowlcdgablc 
people m the computer held. Top this with some excellent 
educational software and the decision to sta> wiili CoinuLodore 
equipment becomes obvious. 

In the next issue we'll look at Sheridan's development lab. To 
test the response of a control system, the real devices are first 
simulated with hardware. This allows one lo predict polenliai 
problems thus reducing valuable construction lime and ex- 
pense. 
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Power On /Error Indicator For 4040 Disks 



» 



In 1980, Andrew Chiu of BMB Com pii science designed an 

add on circuit Ihat offered 4040 users one of the niceties of 

owning an 8050. No, not more storage space, but ralher an 
LED circuit thar indicates power-on and doubles as an error 
indicator. Since this accessory is no longer hein^ sold, BMB 
and Andrew have kindly given The Transactor permission 
to publish it here. 

How many limes have you sal down if front of your com- 
puter and reached around the ijack of your 4040 only to find 
that you're switchini^ ii off rather ihan on? While you feel 

how ho! Ihe cover is, you're thinking back and counting the 
hours your disk has been left on. Sound familiar? You're 
probably also thinking tiow many times you've walked by 
your disk and could have turned it off had you noticed. With 
Ihis circuit, that uneasy feeling youVe shaking off need 
never happen ai^aln. 

The circuit uses a In-colour LED. Like the 8050, it glows 
green continuously (indicatlnci power on), and turns red 

when an error occurs (the third colour is "off"). The buzzer is 
also aclivated by an error, but this part of the circuit is 
optional. 



It's incredibly easy to build. In fact, it 11 lake you longer to 

read this articleand drive 10 Radio Shack for the parts than it 

will to put this thing tc^ether. All you need is one tri-colour 
LED. an SN 7400 (or any chip wiih 5 inverters on it) and the 
optional "piezo" buzzer. If you won't be needing the LED 
that came with your 4Q40, you can use the connector from 
it- To remove the factory assembly, you'll need to pry off the 
locking rinq that tiolds in the LED. Once off. smiply push the 
LED out from the from. Leave the mounting clip in place. 

For a professional toiich. use an eyelet connector for 

ground. You don't really need a circuit board. . . just use 
some electrical tape to cover up the pins and let the whoie 
assembly sit on the bottom of the housing. If you choose to 
include the buzzer, you can tape it to the back of the chip. 

The longer Tead of the LED must be connected to pin 6 of the 

SN 7400 or the indicator will contmuously glow red and lutn 
green for errors. We suggest that the LED be connected to 
the IC with a pair of wires about 20 inches long. This way the 

leads to the logic board connector and the ground lead can 
be kept short. Also, with the buzzer towards the back, it's a 
little less arrogant on those quiet nights. 
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Once completed, you're ready for the dcid lt^il,Cofiiia:l llie 
ground lead to any logic board mounling screw (there's one 

ius( 10 the ri^t of Ihe pin connector). Connect the inpnt lead 
next. The +5 volt pin is the one du^eM to the riylu of tlie 
unit when looking from the (rent. Turn your disk drive on. 
Any smoke? No? Good, It the LED is glowing green, you've 
passed (est 1 . Now try sending an error to the error channel: 



open 1.8, ISiptint'l, 'jlberrish" 

ThiswiIlraii<;e^?SYNTAXERRORand The LED should glow 
red. Read the error channel and it should go back to green. It 
all this works, slide the locking ring over (he LED. inserl it 
h?irk into the mounting clip, and push the locking ring inio 
place. You're done! 



To 

Pel 

Disk 

Legit 

Board 



+ 5 Volts 




Tri-Colour LED 

RS-27^-060 



Piezo Buzzer 

RS-276-035 



Ground 
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More About Filing 



Jim Butterfield 
Toronto, Ont, 



Last issue we looked at simple filing techniques. Let's review 

them and add more details so thai we can use more ad- 
vanced coding. Even the simple coding is clearer if you 
understand the ideas. . . and they are not fiard. 

Writing A File 

It's noi hard lo wrire a file. A simple program such as: 



screen. 



lOD OPEN 2,1.1, 'niENAME' 

100 OPEN 2,8,3, ■0:FlLENAME.S,W 

100 DOPEN'2," FILENAME \W 

. . .then . . 

no INPUT' NAME "iNS 

120 PRINT*2,NS;CHR$(13]; 



(cassette tape) 

(disk) 

(disk, Basic 4,0) 



TheCHRS(l3) is there to eliminate an unwanted '^Linefeed" 
character Yoj don't need it for cassette tape or Basic 4.0; but 
it never hurts. When you use it, don't forget the semicolons, 

130 INPUT "AGE'iA 
140 PRINT-'2,A;CHRS(13); 

Although wcVc writing a number, keep in mind that it wilt 
be writien as characters, just as it would appear on the 



150 INPUT "MORE";X$ 

160 IFLEFTS(X$J)-"Y" GOTO 110 



- r 



To write more information just go back and do it again. You 
can write as much as you like; it will take you a long rime to 
fill disk or tape. DO NOT go back to the OPEN statement - 
the file must be opened only once. 

170 CLOSE 2 

You must say CLOSE, notonlyfornealness. As you write the 
information, it does not go to di^ or tape immediately. It's 
collected in a buffer until there are enuugti didrdUer^ iu 
write. For tape, that's 191 data characters; for disk^ it's 254 
data characters. If you torgel lo say CLOSE. Ihese characters 
will never t>e written, and the file won't be wrapped up 
correctly. 

We don't know how many records we have written. It might 
be just one name and age. it might be five hundred. That 
doesn I mailer: we'll be able to fmd out when we read the 
information back. 
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Reading The File 

100 OPEN MA "FILENAME" 
100 OPEN 1, 8.2/ FILENAME' 
100 DOPEN'l/'FJLENAML" 
. . , then . , . 

no INPUT'l.NS 



(tape) 

(disk) 

(disk wilh Basic 4.0) 

(get name) 



The following line is for Original Basic: ROMs only. If your 
PET powers up with the mcss^igc: 



W*4 



COMMODORE BASIC"- 



including asterisks, you have ar early modd machine with 
slightly different logic. You need to code: 

120 IFSTOO GOTO 200(Originfll ROM only) 

More about that in a moment. Continue: 

130 INPUT*l,A 

140 PRINT''NAME:MEFTS(NS4 ' ".6): 

150 PFilNT'"AGE:';KIGHTS(""+STR£(A).3) 

We are printing the information prettily in columns on !he 
screen. Now, if you used line 120 above because? you have 
an Original ROM PET, type: 

160 GOTO no 

Olherwise, continue with: 

160 1FST = OGOT0 1IO 

We should close the file for neatness when we are finished: 
200 CLOSE 1 

Now: what about this line 120 versus line 160 business? The 
very first PETs had a different logic from later models, ffere's 

how the first PETs did it: 



l4 



Try for the data. If it's not there because 
we re at the end, set ST equal to 64/' 



This has been changed in all later PETs, ViCs and Commo- 
dore ^4s lo work this way: 

"If this is the last item of data, 
set ST equal to fi4'^ 



Thie newer ROMsaremudi more stdEidardized. On Itie early 
machines, tape worked a little unevenly and disk couldn't 
be connected. For this reason among many others, ( like to 
urge owners of Original ROM PETs to ,;^et (he new chip set 
that will make their machines more up lo date. 



Coding Comments 

The first value in the OPEN statement is a number of your 
choice. It's a convenience number for you - the tape or disk 
has no idea if you are using 1. 2. or 50 and ii obviously 
doesn't matter. After the OPEN, it's the only number you 
wi]| use to refer lo the file. It's called the Logical File 

Number. 

There's a super bonus in the Logical File Number system, 
and it's visible in the coding above. Once we have opened 

the file, wedon't care what lilt; device is: our proRram will be 
the same in either case. In fact, we could change the input 
program above to select tape nr di^k- 

100 INPUT 'TAPE OR DiSK";X$ 

101 IFLEFT$(XSJ)= -T" THENOPF,N \,\,0. 
'FILENAME" : GOTO 1 10 

102 [FLEFT$iX$,l)="D" THEN OPEN 1,8,2, 
'FILENAME" : GOTO 110 

103 GOTO 100 

Now one program handles either di.^k or tape. The remain- 
der of the coding remains the same. 



Special Problem Areas 

Never write a record to a file which is over 80 characters 
long- You'll have trouble when you INPUT', since the Basic 
Input buffer can hold only 80 characters. You can get around 
ihisby using GET', . . but Ihat's time consuming 

Watch for special characters that can wreck your Input. The 
rules are the same as for file INPUT* as for keyboard 
INPUT. . . the dangeiuui ditiratters are die comma, the 
colon, and the quotation marks. Once again, you can work 
around this problem with a GET* stalement. But it's much 
easier to avoid the special characters and reap the benefils of 
the powerful INPUT* command. 



Conclusion 



So the value in ST got signalled a littlccarlier-i^vy^ the last The fine points are nut that diffJculL Think of the rules, and 
item instead of afterihe last item. filing data will give you no trouble. 
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Translator Utility 



Many computer systems function very well when operating 

under Iheir own well defined environment. However, once 

the computer steps outside it's own confines and communi- 
cates with foreign devices it may discover that it does not 
speak the same tongue as the other device. For example, 
PET ASCII and true ASCII code differ diid are often con- 
verted from one to the other by a table conversion (see the 
last Transactor). 

One common use of this translator is to drive several 

different printers with the same software. For example, to 

drive an EPSON printer with software designed for the 
Commodore matrix printers we would convert not only the 
PET-ASCII to true ASCII but would also convert the printer 
control codes. For enhanced print we would map the PET 
character-1- to character -M- for the EPSON. For paging 
we would map the PET [cir screen! character - 1 47- to -0- 
(ignore it) and the PET [home] character -19- to character 
-12- (top of form) for the EPSON. 

Similar translations are useful in a communications envi- 
ronment. When speaking to other computers, some of the 
PET cursor control characters are completely misunder- 
stood by the other system. . . sometimes with tragic ends. 

Other applications include decoding true ASCII disk hies 
generated by one program for use with another that deab 
with PET ASCII only. The sample program demonstrates an 
encrypiion technique allowing one to encode information 
within the software. At some later lime, the same utility 
would then decipher the strings by simply reversing the 
process. 



Bill MacLean 
Milton, Ont. 



The routine was originally written to help generate multi- 
-lingual soltware where additional characters are added to 
the alphabet and must be sorted into tlie original 26 charac- 
ters (did you know that the french have 4 'e's between d' 
and T). We used machine code for speed, and the code is 
completely relocatable dJid will accommodate a table lo- 
cated anywhere in memory. As shown, it starts at S7d00 
which allows room for two 25fi byte tables to be placed at 
t7eOO a[id $7f(K). The sampler program praecl:> the routine 
from BASIC with POKE 53. 125 : CLR. 

To use the routiiie, you simply call the code with a "sys" 
followed by two arguments: 

sysad,a$, Ia% 



"ad" is the start address of the machine code 

"la%" is the start address of the table, note that ta% is a 
decimal number and has a value between -327fi7 and 
+ 327G7. If the table is located anywhere in the bottom 32k 
ofthePETiheabsoluteaddresscanbeused. However, if the 
table IS located above $8000 p27fi8) then Ihen two's compli- 
ment uf the address must be uxd. H Ihe table is al S900C 
(36864)thenad% = 36864-65535. 

^a$" IS the name of the siring lo be trariblated, a[id [uusl 
reside in the computer's memory someplace. 

The result of tbe Iriinslation is placed ijito the called siring 
variable. 



] 
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Source Code 



A Nifty Encryption Routine 



*^'T 



BASIC: 



,0 



2.0 



chkcum = tbefS 


;$cdf8 


1 fndvar 


= tbd98 


:$cc9f 


2 discrd 


= tc7b5 


;$dS7d 


3 fllpl 


= $c92d 


;$d6d2 


4 toerr 


- tbfOO 


;$ce03 


10 


• = $ 


7000 




100 Iranslal 


jsr 


chkcom 




no 


isr 


Indvar 




120 


Idx 


$07 




130 


bpl 


nulvar 




140 


jsr 


discrd 




150 


Sld 


$00 




160 


stx 


$01 




170 


sty 


$02 




180 


jsr 


chkcom 




190 


jsr 


fndvar 




200 


jsr 


ntpt 




210 


Idy 


-$00 




220 irl 


Ida 


(*01},y 




230 


sty 


$0t 




240 


tay 






250 


Ida 


(Jn),y 




260 


Idy 


$ot 




270 


sta 


($01).y 




280 


iny 






290 


cpy 


$00 




300 


biie 


III 




310 


m 






320 ntiJvar 


imp 


loerr 




330 .end 









100 poke 53. 125: clr :gosut) lOOO : rem protect spaced set up m.c. 

110 b = 7'4096 + 13*256 : rem arfdres-i of m.c. ($7dO0) 

120 a = 7*409G+ 14-25G : rt^iiidildresiof lablt: I ($7t:Q0) 

130 fori = 0to255 . pokea + i, i : nexl : rem make table 

140 ke^l7 : rem encryplion key 

150 input "some string (eg. iiariie)';a$ 

1 60 sys b, aS, a 4- ke : print at : rem encode a$ 

170 sys b, a$. a-ke : print aS : rem aS ok again 

180 print : goto 150 



BASIC Loader (BASIC 4,0 version) 



1000 forj = 32000 to 32049 :readx:pokej.K; nexl; return 
1010 data 32.245.190, 32.152,189,166, 7, U. 37 
1020 data 32,181,199,133, 0,134, 1,132, 2. 32 
1030 data 245. 190, 32,152,189, 32. 45,201.160, 
1040 data 177, 1,132, 15,168,177, 17,164. 15.145 
1050 data 1.200,196, 0.208,240, 96, 76, 0,191 
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Making Friends With Sid 



Paul Higginbottom 
Toronto, Ont. 



vr» 



The synthesizer chip in your Comiiiodore-64 computer is 
affectlonaiely known as Sid. Sid is in fact an acronym tor 
Sound linlerface Device. I doubt that many people realise 
just how powerful this chip is, but I intend to unleash some 
ot its power tor you. If you read some of the documentation 
for Ihe CoiTimodore'G4 about its sound capabilities and are 
new to synthesizer iargon (as I was), you probably thoughr lo 
yourself, "I'm never going to figure that out!" Well. I am the 
sort of person who gets more determined to figure some- 
thing out, when it seems harder than ever lo do so. So, step 
by step, I, like any beginner, set about learning how to 

control the Sid's sound capability. 

The Jargon 

If your mind is like mine and tends to go blank when 
confronted with a barrage of alien jargon about something, 
then hopefully I can gently "break you in" with the tenns 
associated with music synthesis using Sid. 

The Sid chip is comprised of three sections essentially; 

1) Oscillator section 

2) Envelope section 

3) Filler section 



There are a few other bits and pieces, but more on those 
later. 

Sid has three voices. That means to you and me, that up to 
three tones can be played at the same lime. 

Each voice is seperately controlled by its frequency (Ihe 
pitch of the tone), and more importantly, its envelope. 

The envelope of a voice, determines how its volume rises, 

sustains, and talis, like a musical mstrument. or other 
sounds we hear in our lives. For example, a violinist, will 
maybe play a note by pulling the bow across a string slowly 
at first{the volume starting out tow], and as the player starts 
to increase the speed and pressure of the tfow on the string, 
so Ihe volume increases, and as the player ends the note, he 
or sheslowslherateandpressureof thebowagain.and Ihe 
volume fades away to silence. With a single violinist, the 
tone may fade away rather abruptly, but I'm sure you've 
heard this rising and falling effect of volume, with a piece of 
orched ration (many string insluments). That is one example 
of an envelope. 

tf we conskier another example to allow you lo grasp 
different types, think of hitting a cymbal. The rise lo its 
maxtmum volume is almost instant, as the CKASH of Ihe 
cyjnbdl begins, and from that point, the sound simply lades 
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away slowly lo silence again. An example of a cymbal type 
of sound that does rise slowly first and then fade away would 
be a wave approaching the beach. You hear (he slowly 

Increasing volume of the wave moving up the beacti. then 
as the wave trips over itself and hits the beach the loudest 
part of the noise is heard, and then the sound fades away as 
the wave sUdes up the beach, and the nex[ one approaclies 
again. 

Well, eiteui^h of [he examples, back to tt» technical stufl. 
This "behaviour" of the volume (or amplitude) of a voice, 
can be defined in A parts, and this terminology is common 
amont[si professional synthesizers costing many limes (he 
prices of your Commodore-fr4 computer! 



The Four Parts Of An Envelope 

You may have noticed by now. thai to dtfne this changing 

in volume, we simply need to define the TIME it takes for a 
soundlogofromonevolume. to get to another volume For 
example, the vollln might have faken half a second to go 
from no volume (silence) to its maximum volume^ and then 
2 seconds to fade away again (silence again). The cymbal 
took no time !o reach its maximum volume (starts with rhe 
CRASH)»but 10 secondsto fade away. The wave is different 
again, in that it might take 5 or so seconds to build up to 
maximum volume las ir moves up me beach), and then only 

1 second to die away (as the wave falls over and crashes on 
the beach). 



Part 1 - ATTACK 



Part 2 - DECAY 



This is the time taken to go from 
silence (0 volume) to the maximum 
volume Sid is set to. 

This is Ihe time laker to go from the 
maximum volume Sid is set to. to a 
given "mid-point" volume, or, sus- 
tained level of volume. 



Part 3 - SUSTAIN This Is not a lime value, but is a level 

of volume the voice sustains at alter 
the ATTACK and DECAY, 

Part ^ - REiiASE This is the time taken lo go from the 

sustained volume to silence once 



In those definilions, I mentioned "the maximum volume Sid 
Is set lo", and that js the maximum overall volume (just like 
the overall volume control on your television or stereo). 



How We Control 5id 

Beforelgoany further, I want lo explain how we actually lell 
Sid exactly what weird and wonderful sounds we want it to 
make (so we can drive everyone crazy!) 

The Sid chip has an amount ot memory in it, and simply by 
putting numbers into those memories, we give Sid all the 
information it needs to produce an infinite number of 
sounds. We pul numbers into memories with the BA^iC 
command "POKE". We give Ihe POKE command two num- 
bers; the memory number (or "address^'), and Ihe number 

we want to pui into that memory (one memory loca[ion can 
hold any whole numt>er between and 255). 

Sids address is quite a big number. He starts at 5427^. and 
he occupies thai memory location and the next 28 also, up 
to 54300. 

1 want to show that ii really is not thai difficult to train Sid, 
and that you don't have to t>e a genius at programming. 



Making Your First Beep 
To make a noise, we must do 4 things: 
1} 5el the maximum overall vcdume 

I 

2) Sel the envelope of the voice we wish to use 

3) Sel the frequency of Ihe voice to Ihe desired pitch 

4) And only then "lell" Sid lo do it. 




I pul quotes around "tell" in part 4. because I want In 

examine that closer. When we lell Sid lo make a sound, we 
lelHl to firsllydo the ATTACK (rise up to maximum volume) 
and then the DHCAY {go down) to a SUSTAlNed level of 
volume. When we tdl Sid lo do that part, llie Jioise will slay 
at the SUSTAlNed level of volume forever if you don't lell it 
to go on, and do the last part: the KtLtASK (go down (rum 
Ihe sustained level of volume, to nothing). 
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So lo recap, we (dl Sid to du Ilie ATTACK- DECAY-SUSTAIN 

part first, and then when we're ready, we tell ll lo finish the 
envelope with the RELEASK part. 

You couid get a person to demonstrate this for you. Ask 
them to take a DEEP breath when you t;ip them on the 
shoulder and Ihen hum a note aL first quietly buiidir up lo a 
loud level, and the going down to a comfortable IcvcL You 
have mad3e a person do the Attack-Decay-Snstain part of 
an envelope. I said the sound will continue indefinitely if 
you don't tell it to release, so when you tap the person again 
on (he shoulder, they can slowly qtiieten (heir hnmdownto 
nothing. Of course if you decide lo make them sustain for 
two long, they'll go blue in the face, and pass out! (Also, you 
may want them lo stop before they get fo \h& rplpaw*, 
because Iheir hum is so obnoxious! (Forlunaidy, you can 
also do this with the Commodore-64!) 

For now, let's just concenlrate on ONE vofce. Each voice has 
7 memories inside Sid, to control it. Voice 1 *s memories are 
in fact, the first 7 memories, vok^e 2. the second 7, and 
voices, thenexl 7, Thai, ifyou've been doing your malh, is 
the first 2 1 memories in Sid. The other 8 (there are 29 in all) 
are for itie tiller section which I haven't talked abotit yet, and 
other bits and pieces, includjjig the overall vuluriit control 
which I have menlioned). 

The 7 memories for each voice are all uri^diiised [he same 
way. for example, ihe first two of each block of 7, control the 

frequency (pitch) of the voice. 

The 7 Memories For A Voice 

The first two as I just mentioned, control the frequejicy uf 
ihe voice, that is, the pitch of the sound. 

The second two are to control one particular type of sound, 
which will be covered later 

The fifth memory is the conlrolling memory of the voice, the 
one which will tell Sid lo start ihe note, slop it, and choose 
(he type of sound. 

The sixth memorj' controls the duration of the Attack and 
Decay. 

The seventh memory' controls the Sustain level, and the 

Release time. 

The fifth of the seven I just described, I will now explain 
hjnher. I mentioned there that apart from telling Sid to play 
the envelope, it also conirols the l>pe of iuund. (Another 
piece of jargon commg up!|The lype of sound is known as 



the Waveform. You are probably aware that sound Is com- 
prised of air being compressed and sirelched. B>. for exam- 
ple, a speaker cone, which moves in and out, and the speed 

(Ihe FREQUENCY) at which it moves in and out, determines 
the pitch. 

The way in which air is compressed and su-etched is cyclic 
(repeats itselO, and this cycle is known as the waveform, 

Sid allows you to chcxwfrom oneoi lour waveforms, and it 
is the fifth of the seven memories in each voice, which you 
set lo tell Sid which waveform you wish to use. 

The Waveforms 

Triangular (shaped hke this: W^jThis waveform, due its 
smoothness produces a mellow, soft flute-like sound (very 
pleasant to the ear!) 

Sawtooth (shaped like this: •W'jTliis waveform, due lo its 
abrupt endmg produces a brighter, brass-like sound- 
Variable width pulse (shaped anything from thb: AJL , to 
Ihis: JTJ". or this: JTTL [which if you look issimply the first 
one upside-down]) 

This waveform as you can see from the description in 
parenihesese can be varied, but is essentially an ON and 
OFF waveform, and as such is very abrupt and produces 
anything from a hollow, organ-like sound, to a very quiet, 
reedy sound As you can see from the symbols of this 
waveform, it is comprised of pulse, or varying widths (hence 
the name), and memories 2 and 3 which I mentioned earlier 
were for a specific lype of sound, do in fact control the width 
of the pulse when this waveform is chosen. Of course, 
memories 2 and 3 have no effect when any other waveform 
is selected. 

Noise - I won't try to do a little drawing of this waveform, 
sinceit isinfact aRANDOM waveform, and has no defined 
harmonic qualities, but because tlie frequency can be al- 
tered, will produce any sound from a hiss (like you hear 
from poor quality cassette recorders), to a low rumble (good 
for special effects in games). 

Please note the format of the memory Icx-alions uspd. I 
mentioned that the first TWO bytes are used to select the 
frequency, but did not say how one would know what 
values to put in one and the other. The easiest wav to look at 
it, I would expect would be thus: 

Since one memory location can only contain a number from 
to 255. to represenl larger numbers, they are stored as to 
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255 in the first byte (known as the low b/le), and multiples 
of 256 added to this in Ihe second byte (known as the high 
hvte), which means two bytes can hold a number from 0(0 
iji both locations), lo 65535 (255 in the first one, plus, 255 
times 256 in the second one). 

The ATTACK-DECAY memory, and the SUSTAJN-KELEASE 
memory are comprised as follows; 

The ATTACK. DECAY, SUSTAIN, RELEWE parameters can 
ail be one of to 15. To form the ATTACK-DECAY value for 
memory location 6 in a voices 7 memory locations, simply 
muliiplv the ATTACK by 1 6 and add the DECAY value This 
again gives a combined value from (0*16 + 0) to 255 
(1S-lfi+15). 

The control register works differently stilh The value is 
calnilaled as follows: 

Add 1 to begin Attack-Decay-Sustain cycle, don't add 1 to 
begin the Release c>'cle. 

Add 16 to select triangular wave form, 32 for sawtoolh, 64 
for variable width pulse, or 128 for noise waveform. 

There are other parts lo add lo this value, but they won'l be 
covered here. 

The Beep Program 

Turn on your Commodore-S4. and type in the following 

program: 

10 sid = 54272 

20 

30 



fori = 0to28:pokesid + i. 0; nexE 
pokesid + 24, 15 



40 pokesid+ 1.20 

50 poke Sid 4- 5,0*tG-+-0 

60 pokesid+ 6, 15*16 + 9 

70 poke Sid + 4. 1-16 

80 pokesid+ 4. 16 

Description Of The Program 

Line 10 defines a variable SID, to rhe start of Sid's memory 

iocrations. 

Line 20 should be included in all of your sou nd programs, 
and is a FOR., NEXT loop to simply set all of Sid s memor>' 
locations to to ensure that no previous programs will affect 
our effcHls. 

Line 30 sets memory location 24 in Sid. lu 15. Register 24 



conirols the overall volume of Sid (and some other things 
which need not be known here), and 15 is the maximum 
volume (from to 1 5). 

Line 40 sets the upper byte of the frequeno' value of voice 1 
to20.whichmcansasettingofO + 20*25G - 5120. 

Line 50 sets the ATTACK value of voice 1 to 0, and the 
DECAY value also to 0, which means when we tell Sid lo do 
its AITACK-DECAV-SUSTAIN cycle, it will simply go 
straight to Ihe SUSTAIN volume, since we Ve lold it not to do 
any ATTACK or DECAY ai all. 

Line 60 sets Ihe SUSTAIN value of voice 1 tol5{maximum 
volume), and the RELEASE value also lo 9, which means 
when we tell Sid to do its RELEASE cyde. it will take about 
three quarters of a second lo fade away to nolhing- 

Line 70 sets the control register of voice 1 to do the 

Altack-Decay-Sustaln sequence, with the triangular wave- 
form selected (+16). 

Line 80 sets the control register of voice 1 to do the Release 
part of the envelope, again with the triangular waveform 
selected (+16). 

Having typed in this program, type: 



RUN 



And the familiar: 

READY 
D 

Message will come back almost immediately, wilh the mel- 
low sound fading away {provided you have the volume 
control on your television set up reasonably high so you can 
hear it!) 

Well, there's a LOT o! new things for you to absorb in this 
article before wc can go on lo further things. We've only 
done a PING so far, but we'll have Sid playing Bach soon 

enough {or maybe a little Genesis?) 



Commodore 64 Piano /Organ Program 

Want to hear more from SID? Then type in this short 
program also by Paul Hi^ginbottom! 

The first half of the program sets up the screen, the key- 
board, and the chip itself. Lines 90- 1 40 simply draw a piann 
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keyboard on the screen, so if you don"! get it right from the That's about ii. Th^ program is pretty easy lo follow around 
listing, don 'I worry *boulil. . . they don't aflect the operation (like most Hi ^in bottom programs), so if you can assimilate 
of the program. Lines 150-180 are instructions, this one. SID theory will become second nat tire. 



I 



Lire 1 90 sets ' V equal to the t>asc address of the SID chip. 
192 and ]9^ declare some nther delaiilt values. After that 
curnes llie kevUjard, You'll notice that Paul uses translation 
array icchEaqucs discussed in another article in last issue. 
240 erases the message printed by 180, and 260-280 resets 
the SID chip. Line 290 is "REMed" out for some reason. Try 
removing the REM to see what i( does. 

Once all set up, lines 300 on do all the work! Lines 500-570 
are Icxiking for the function keys at the right. 580 detects the 
"spacebar" . To clear pvprylhing and <itsrl again, hit SHIFT 
&CLR (line 590). 



If you want, add the lines following the first listing. The "X" 
command will execute the song stored in the dala state- 
ments. 

Yet another Higginbottom program, SIDMON 1.0. appears 
in Volume L Issue 3. of Commodore's Power Play maga- 
zine. SIDMON 1.0 is, as the name su^ests. a SID Monitor 
that lets you change the envelope values, waveforms, vol- 
ume, frequency, filter and special elfecis sections of the SID 
chip. The program is good for experimenting when you 
want to find a specific sound for a desired effect, Paul's 
Organ 64 proi^ram allows for more dynamic playing al- 
though not all of SID's features arc implemented (hint hint). 



I 
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90 print ' 
100 print' 

110 print' 
120 pnnt' 
130 prim' 
HO print" 
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150 print' 

160 print" 

170 print' 

175 print' 

176 print' 

177 print' 
180 print' 




ipacem to select "1 ' or '3^ voice mode 
f1 ^[3 D oclave tip/ down 
f5 H nexl 'musical' waveform' 

f7 1 select noise waveform " 

a Hs PI runing controls down/up' 
m^l select mode: piano, organ, hold, glide 

'*• settini^ up frequency table •'• " 
190 5=13*4096+ 1024 

192 al=0-de=12:su = 0:re = 0:sr = su-16 + re:ad = at-16+de:wv"17: w^0:oc^1 : tu=T 

193 C7 = 7:c4 = 4:c0 = 0:c1=1:c3 = 3:ky=197:nk-64:c2 = 2:c5 = 5:c6-6:hb=256:co = 2-n/12) 
J95 dimfr(22,4).k(255) 

200 fori^0to28:pokes4-i,c0:next:fori=0to4:a(i)=2 - i: next 

205 n=7040:fori = 22tolstep-1 :f=n*5.8 + 30: lor i = 0to4 ; fr(LJ) = l/aO): next 
215 n=f1/co:next 

220 kJ=*q2w3er5t6y7m9cOp@-*\f' 

230 for i= 1 to len(kJ) : k(asc(midS(k$j)))= i : nexl 

240 print 'B 

260 for i=0to2 : l = i*7: poke s^-cS+t, ad ; pokes + c6+t,st : poke 5+c3-H, 15: next 

280 pokes+24. 15 

290 rem poke s+ 14,0: poke 5+- 15.0; poke s-^ 19. 0: poke s+20, 240 : poke s+ 18. 17: poke s^- 24. 255 

300 geta$:ifat-"'then300 

310 se=k(asc(a5)}:fr = fr(se,oc):iffr=cO then 500 

320 t = v*c7:cr = s+t + c4:fr=fr*tu 

330 og = 0:ig=30:pokecr, z 

33S if md = r3 then 1000 

340 pokes+t, fr-int(fr/lib)'tib 

350 pokes4-t + c1,fr/hb 

370 poke cr, wv 

380 ifp = c1 thenv = v+cl : ifv = c3tlien v = cO 

390 if(mdOc1)then300 

395 if peek(ky)<>nk ttien 395 

400 pokecr, 8 : goto 300 
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then oc = oc-1-(oc ^ 0) 
' then oc = oc 4-1 +(oc = 4) 

" then wv = ((((wv and 254)»2) and I27J or1H6*(wv>33) 
"then wv- 129 

therp = 1-p 
then tu = ru + . 005 
and luM) then lu ^ tu-.005 

then md = md + 1 : goto 9O0 
■ then 200 



500 ifaj = 
510 ifa$- 
540 ifa3 = 
570 tfaS = 

580 ifaS = 

581 JfaS = 

582 ifa$ = 
587 ifaS- 
590 ifa$ = 
600 goto 300 

900 ifmd=0thenfori = 0to2 t=i*7: poke s + 5 + t. ad :pokes + 6 + t. z : next : goto 300 

910 lf(md=1)or(ind = 2)thenfor[^0to2:t=i»7:pokes + 5-ft. z: poke s + 6+t, 240 : next : goto 300 

920 If md>c3 then rad - : goto 900 

930 goto 300 

1000 pokecr, wv 

1005 fori=lftofrslep(fr-IO/S 

lOlO pokes4t, i-inl(i/hb)-hb 

1020 pokes + i+cl,i/hb 

1030 next 

1035 pokes-ft.fr-int(fr/hb)*hb 

1036 pokes-n + cl.fr/hb 
1040 is = se:lf = [r:goto38[) 



! 



TlwTninHictor 



SI 



Joni>ttrVl9»3 



585ifa*="x" then 10000 



9000 rem tune 1: (tunes end with ^0^) 

9002 data20, 17.15, 17. 13. 17. 12, 17, 10, 17. 8.17 

9005 data 6. 17, 15, 13. 15. 15, 13, 15, 12, 15, 10. 15 

9006 dsla 8.15. 6,15. 5,15,13,12,13.13,12.13 
9008 data 10. 13, 8.13. 6,13, 5,13. 4,13,12.10 
9010 data 12. 12. 10, 12. 9,12. 7,12, 5,12, 3.12 
9020 data 1.12, 10, 8J0, 

9600 rem lune 2: 

9605 data20, 12, 8,10.12.15,13,13,17,15,15,20 
9610 dalal9.20. 15. 12, 8.10,12.13,15,17, 15.13 
9620 data 12. 10. 12. 8. 7. 8,10. 3. 7,10,13.12 
9630 data 10. 12, 8,10.12.15,13,13,17, 15, 15.20 
9640 data 19. 20, 15, 12. 3.10,12. 5,15,13,12.10 
9650 data 8. 3. 8. 7. 8,12.15.20.15.12. 8.12 
9660 data 15. 18, 15, 12, 8.12,15,17,13,10, 7.10 
9670 data 13, 15, 12. 8. 5. 8.12.13,10, 7. 3. 7 
9680 data 10. 13. 12. 10. 8J2, 15.20, 
9700 rem lune 3: 

970,^ data 20, 5.10.12,13.17,13,12,13, 
9800 rem add tunes here(-l. -1 = no more) 
9999 data -1,-1 



10000 read le: print : rem read tempo" (1 si element ol lune data) 

10002 : rem 20 in all of above 

10005 reada !ifa=zlhenprinl:goto300 

10006 prima: 

10010 [f a = "l then restore : prinl ; goto 300 
10015 fr = f(aym:t = v'7:cr=s+t + 4 
10020 pokes-f5 + i.z:pokeS'f6+t,z 
10030 poke cr, 8 : polce cr. z 
10040 pokes + t.fr-hb*int(fr/hb) 

10050 pokes+1+t. fr/hb 

10060 pokes + 5 + t,ad;pokes-HG-ft.sr 

10070 pokecr. wv + 1 : fori= 1 loSO-ai : next 

10075 pokecr, wv 

10080 ifp=l thcnv = v+l :ifv-3lhenv=0 

1009(1 fori=l tole; next 

10100 goto 10005 
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The 64 Skiffle Band 



Jim Butterf ield 
Toronto^ Ont, 



Somewhere up in the liilbof Ccmmodorecouniy, ihere'sa 
jug band and skiffle group that gathers from time to time. I'd 
like to introduce yon to rhp players, and show you how to 
program your Commodure 64 so as lo hear them play. 



sound chip, it's not hard lo do. 

WeVe going to be the bandleader, so wc musl set up the 
instruments and choose the type of play. . Here we go: 



This is a basic band playing basir music. . so ynn can write 100 print " MUSIC (By Jim Butterficld) ' 

your prugram in Basic, Later, you may want to change 

instruni^tsand add to Ihe group^s repertoire. With the 6^ This identifies the maestro ((liar's me). Now, let's locale the 
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musicians: 



we give it an edge with the "sawtooth", code 32 



11011=54272:12 = 54279:13 = 54286 
120h1=n + l :h2=124l :h3 = l3 + 1 
130v1=11 i4 :v2 = l2 + 4 :v3-l3+4 

Each musiciaa stands in a ''spot" marked by a number. As 
band director, well call up the music for each one by 
signalling each players spot, using his 'address". The L's 
and ffs will be used to name the pilch of the notes; the V 
locations are used for the other stuff. 

H0polte54296,l5 

This tells the listeners lo turn up Iheir hearing aids, so they 
can hear the group playing. The highest volume we can set 

is 15. and that's the one we pick. 

150 poke v1 +1, 9 : poke v1 -1-2. 

Flayer 1 is young Billy; he plays the hanging jugs. When he 
hits a jug with his corncob drumstick it will sound right 

away, and come out with a good clunking sound (that's the 
9. for fa.sl sound attack and fulsome decay). But he can't 
strum tht jug or hold the sound, so the note will fade away 
soon after he plays (that's the 0^ for no sound sustain or 

release), 

1G0pokev24-r36;pokev2 + 2.36 

Player 2 is Bearcat Zeke, who plays the harmonisqueeze. 
When Zekp puffs into his instrument, it takes a moment for 
the sound to build up(wepick36,fora medium speed attack 
and moderate decay). Once he winds up the note, he can 
hold it for quite a while (we set 36 for medium sustain and 
release), 

170 poke v3+1, 18; poke v3-f 2.250 

Old man Mose is in slot number 3: he plays a traditionat gut 
bucket. When he strums the cord, he gets a fast, full sound 
(we'll pick 18 for faa attack and medium decay). Once the 
cord is in motion, it holcjs the sound for quite a while before 

it fades away (250 for a full slow sound decline). 

i80i=ti 

Let's check our digital watches so that we can get the band 
playing in time. 

200 poke v1, IC : poke v2, 32 : poke v3, 16 

Here's where we give each instrument its individual sound. 
Billy and old man Mose have instruments that produced a 
clear, ,';oft sound. For them, we pick a "triangle ' waveform, 
code 1 6. Zeke's cojurapiion makes a sharper, snarly sound; 



We're doing something else important here. By using even 
numbers, we're telling the boys; hands off the instruments, 

Billy, lake your corncob away from the jugs; Zeke, don't 
blow into that thing; and old man Mose, hands off the siring. 
Later, we'll tell them to "hit if with an odd number to the 
same location. 

It s time lo play some music. Let's read the notes. 

210 reads: ifs = 0goto290 

Ftrstn let's get the timing. If the n(rfe timing is zero, we must 
be finished, because we can't play tlidt fa&l. . . 

220 read xl.yl. x2, y2, x3,y3 

Let's get the notes. Each nole is broken into two pieces; 
that's the way we feed it lo the band. If the note is zero, we 
have nothing to play this time around. 

230 if x1 then poke hi, x1 : poke II, y1 ; poke v1. 17 
240 if x2 then poke h2. x2 : poke 12, y2 : poke v2. 33 
250 if x3 then poke h3, x3 ; poke 13, y3 : poke v3. 17 

II a player has something to play (his note is not zero) we'll 
put his note into the proper slot, and then tell him to "hit It", 
by making his waveform number odd - remember line 200 
where we loM everyone hands otf? 

In fact, we're going to go back to 200 later and tell the fellows 
lo let go. If we didn't, they wouldn't be able lo play the next 
nole. But first, lef s do some timing, . . 



260l=t + 3 



I 



Lers set the clock ahead so that we can tell when this note 
has been played long enough- This way, wc can wait until 
the note has had its fn|] time: 

270 if t>li goto 270 , 

When the nole has played, we'll go back and do it dl again, 
with; 

F 

2S0 goto 200 

And when the music is finished, we tell the band to lake a 
break. . . until the next tune. Turn off the instruments. . , 

290 for j = 11 to 54296 : poke j, : next j 

Thai's all very well, bul we'll need some music to play. Here 
il comes: 



* 
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300 dala 


10, 


51, 97, 


0, 0, 


0, 


310 data 


10, 


43, 52, 


0. 0, 


0, 


320 dala 


20, 


34. 75, 


21,154, 


8,147 


330 data 


20, 


34, 75, 


- 25. 177, 


0, 


340 data 


10, 


34. 75, 


17, 37, 


6.108 


350 data 


10. 


:i«, 126, 


0. 0. 


0, 


360 dala 


10. 


43, 52. 


25, 177, 


0, 


370 dala 


10. 


45. 198, 


0, 0, 


0, 


400 daia 


20. 


51. 97. 


21, 154. 


8.147 


410 dala 


20, 


51, 97, 


25, 177, 


0. 


420 dala 


20, 


51, 97. 


17, 37, 


9.159 


430 dala 


20. 


43, 52, 


25, 177, 


10, 205 


440 data 


20. 


57, 172, 


22, 227, 


11,114 


450 daia 


20. 


57, 172, 


34. 75. 


0, 


460 data 


20. 


57, 172, 


28, 214, 


8,147 


470 data 


10. 


0. 0. 


34, 75, 


0, 


480 data 


10, 


51, 97, 


0, 0, 


0, 


500 data 


20, 


57,172, 


22. 227, 


11,114 


510 data 


10. 


0, 0, 


34, 75, 


[), 


520 data 


10. 


51, 97, 


0, 0, 


0, 


530 data 


10. 


57, 172. 


28. 214, 


10, 205 


540 data 


10. 


64, 188. 


0. 0, 


0. 


550 data 


10, 


68, 149, 


34. 75, 


9,159 


560 dala 


10, 


76, 252, 


0, 0. 


0, 


600 data 


20. 


86,105, 


21, 154, 


8,147 


61 data 


20. 


0, 0, 


25. 177, 


0, 


620 data 


20, 


0, 0, 


17, 37. 


6, 1U8 


630 data 


10. 


68, 149. 


25. 177, 


0. 


640 dala 


10, 


51, 97, 


0. 0, 


0, 


650 data 


20, 


68, 149, 


21, 154, 


8.147 


660 data 


20, 


0, 0, 


25,177, 


0. 


670 data 


20. 


0, 0. 


17. 37, 


8. 23 


630 dala 


10. 


51, 97, 


25. 177, 


7, 53 


690 data 


10, 


43, 52. 


0, 0, 


0, 


700 data 


20. 


51, 97, 


22, 227, 


5,108 


710 data 


20, 


0, 0, 


25, 177, 


0, 


720 data 


20. 


0, 0. 


19, 63, 


9,159 


730 dala 


10, 


38, 126, 


25, 177, 


0, 


740 dala 


10. 


43, 100. 


0, 0, 


0, 


750 dala 


20, 


34, 75. 


21. 154, 


8.147 


760 data 


20, 


0, 0, 


25, 177. 


C,108 


770 dala 


20. 


0, 0, 


21.154. 


4, 73 


780 data 


20, 


0, 0, 


0, 0, 


0. 


790 data 












That's ihe whole thing. You can add to itie music, change 
the inslrumenls, change the timing, or do whatever else you 
like. 

If you'd like to listen tn the instnimpnis nneor K^-o al a lime, 
you can silence any player by changing iln^ dppropriate line 
230 - 250 lo a REM line. You could delete the line, but REM 
is belter - it saves typing when you want tn hring the 
inslrumenJ back- 

An easy way lo chanf^t' the speed of a tune is to change line 



260: by multiplying or dividing variable S by an appropriate 
factor, the band can turn frantic or ease back inio Ia2y 
playing. 

If you change the waveform, remmiber that there are two 
places lo do it: line 200 and the approprialc line of 
230 - 250- 

There are a couple of waveforms that we haven't used: 
weVe slaved with triangle (16) and sawlooth (32) instni- 
menls. If you want lo bring in fiddlin" Fran, she will need a 
PBiKe waveform [64). and you'll need lo supply a piilse width 
by setting values into (for instrument 1) Vl-1 and/or Vl-2. 
Snaredrnm Sammy will want a noise waveform (128). Don't 
forget !o add 1 when you wani ihe instrument played. 

The group mostly plays southern music. But on a pleasant 
warm nigh! when visitors slop by lo listen, they might just 
hy a northern tune, . . 



300 data 


20, 


34, 75, 


21. 154, 


8,147 


31 n data 


20, 


34. 75, 


25, 177, 


0, 


320 dala 


20. 


38. 126. 


28, 214. 


6,108 


330 data 


20, 


43. 52. 


25, 177, 


0. 


340 data 


20. 


34. 75, 


21. 154. 


8,147 


350 data 


20, 


43, 180, 


25, 177. 


0, 


360 dala 


20, 


38. 126, 


22, 227, 


8, 23 


370 data 


20, 


0, 0. 


25. 177. 


0. 


400 data 


20. 


34, 75, 


21,154, 


8,147 


410 data 


20, 


34 75, 


25, 177, 


0. 


420 dala 


20. 


38, 126, 


28, 214. 


6.108 


430 dala 


20, 


43, 52, 


25. 177. 


0, 


440 data 


20, 


34, 75. 


21. 1.54, 


8,147 


450 data 


20, 


0, 0. 


-55,177. 


0, 


460 da a 


20. 


32. 94, 


22, 227, 


8, 23 


470 data 


20. 


0, 0. 


19, 63. 


6.108 


500 data 


20, 


34, 75, 


21.154. 


8.147 


510 data 


20. 


34. 75. 


25, 177, 


0. 


520 data 


20, 


38, 126, 


21,154, 


7.163 


530 data 


20, 


43. 52. 


17. 37, 


0, 


540 data 


20, 


45, 198, 


28, 214. 


7, 53 


550 dala 


20, 


43. 52, 


34. 75, 


0. 


560 dala 


20, 


.38.11fi. 


28. 214, 


0,206 


570 dala 


20, 


34, 75, 


22, 227. 


0. 


600 dala 


20. 


32, 94, 


25, 177. 


6,108 


610 dala 


20. 


25, 177, 


22, 227. 


0, 


620 data 


20. 


28,214, 


21.154. 


7, 53 


630 data 


20, 


32, 94. 


19, 63. 


8. 23 


640 data 


20, 


34, 75, 


21, 154, 


8.147 


650 dala 


20, 


0, 0, 


25. 177, 


6,108 


660 dala 


20. 


34. 75. 


21. 154, 


4. 73 


670 dala 


20, 


0, 0. 


0, 0. 


0, 


700 dala 












Next lime you're passing Ihrough Ihe hills of S4, drop in, set 
a spell . , and play along 
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Commodore Assembler 
Editor For Basic-Aid 



F. Arthur Cochrane 
Beech Island, SC 



The program presented here links wilh Ihe Basic-Aid pro- 
gram as pubhslied in TrtJ[isai:li*i Vuluriie 3 Ihsue 6 pai{t 52. 
This program combined with Basic-Aid becomes a Commo- 
dore Assembler Editor. 

After Basic-Aid was done il was noliced that Basic-Aid was 
very similar fo the Commodore Assembler Editor that is 
supplied Willi Itie Aiseuibler Development Package. The 
only thing Basic-Aid lacked was a method to GET and PUT 
the source code files to tfie disk. Since the source code for 
the Commodore Editor is supplied with the Devebpmeru 
Package it is available for easy modification and use. 

The program presented here changes the CHRGET Wedt^e 
routine to point to itself. A line that is input beginning with a 
line number is inserted into memory without being tokeni- 
zied. Otherwise this proj^ram diecKs to see if the direct 
command is in its command list, and if il is the command is 
executed K the command is not an editor command then a 
jump ib made to Basic-Aid to let tl check its conuiidJids, 

Using Basic-Aid as part ol an assembler editor allows the 
programmer all the features of Basic-Aid to be used in the 
editing of machine language source code. The most power- 
ful of these is the ability to scroll through the code with the 
cursor control keys. 



The program us presented here is for BASIC 4.0 and Basi- 
c-Aid at $7000, but it could be assembled to ejcecuted lot 

BASIC 2.0 and Basic-Aid somewhere else- 
Two notes on this prot^ram and Basic-Aid. The Commodore 
Assembler appears to use locations in the second cassette 
buffer that are 7^]'^ used by Basic-Aid and this program, so it 
is advised to use the KILL command to disable them before 
running the assembler (they can be enabled with a SYS aflei 
running the a.<;semhler). Also do not use the BASIC 4.0 
CONCAT command with Basic-Aid enabled. This i-. u* > .luse 

BASIC 4,0 builds DOS commands in the secorid cassette 
buffer hpfnre spending them lo the disk. Basic-Aid uses 
locations in the second cassette buffer that will be overwrit- 
ten by the building of the DOS command for the CONCAT 
statement, since il is the longest one built. 

[f the reader is lazy, the source code for Basic-Aid and this 
program are available from ATUG. Below is a list of the 
instructions, a hex dump and a BASIC program to POKE the 
program into memory. 

ATUG (ASM/TED Users Group) 
c/o Brent Anderson 
200 S. Century 
Ranioul,!L6I865 

2I7S93-J577 
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Editor Command List 



This program adds commands to Basic-Aid that allow it to 
be a CBM Assembler Editor. Noie that rhis editor should be 
Killed before running ihc assembler because it uses some 
of liie same memory locations in the second cassette buffer 
as the assembler (Joes. 

BASIt-AlU Syntax: BASIC-Aro 



COLD 



Syntax: COLD 



The COLD command will do a software rest of the PET. Thia 
reset is like a power-on restart. 



FORMAT 



Syntax: FORMAT [line range] 



The FORMAT command is used to print the text file in 
labt>ed lormat like the assembler. For this funcfion to work 
correctly you must type mnemonics fn column two, or one 
space from labels. The line range is the same as for a LIST, 
The same keys a.s for Basic-Aid can be used for to hold, 
pause, and stop the llsiini?. 



GET 



(As ol January 4, 1982) 



Syntax: GET ' filename ' [Jtne * 



The GET command loads assembler text files from disk. 
This command is used to \o^d source files into the editor and 
append to files already m memory. The file Is input begin- 
ning at the line number given, GET starts numbering as 
lOOO by 10, 



This command will disable these extra commands and 
initiaiizeBasic-Aidonly, PUT 



Syntax: PUT " dr:filename " [.line range] 
CPUT "dr:filename" [.fine range) 



The PUT command outputs source files to the disk for later 
assembly. PUT has the ability to output all or part of The 
memory resident file. The CPUT (for Crunch-PLT) com- 
mand will remove extra spaces not in comments or ASCII 
text. 



LOADER 



Syntax; LOADtR -filename" |,hex off- 
set] 



The lOADER command does the same function as the 
separate loaders on the disk The hex offset allows the object 
code to t>e stored at an address other than the assembled 
address. The same keys as in Basic-Aid can he used to hold, 
pause, and stop the listijig. 
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Basic- Aid Assembler Editor Loader 


100 1 = 0: 


for i = 1 to 5 : read ch(i) : next : read ch, ch 


105 fori = 


1 to5 :ch=0: tor 1=0 to 255 : readx :ch = ch + x: next 


110 print 


' checksum for block '; i ;"" = '; ch ; 


115 ifch = 


:ch(i)then print "ok' 


120 if ch<>ch(i} then prim "error" : tjl 


125 next i 




130 if1<>0then*;lop 


1 35 restore : for i = 1 to 5 : read ch{i) : next : prim " loading. . . ' 


^ 140 read b. hi :fori-ioto hii read x ipokc 1, x :nexli 


145 print 


• lave SfibOO 10 $7000 ■ 


150 end 




1 55 sys lo 




160 rem checksums 


165 data 31785,31032,32232.33356.21826 


170 rem start and stop address 


175 data 


27H92 . 28671 


180 rem block 1 | 


185 data 


169, 0, HI, 136, 3,173,248, 111,174,249,111,224,128,176. 7,133 


190 data 


52,134. 53, 32,233.181.162, 15,189, 43,112.149.112.202, 16,248^ 


195 data 


173.250,111,174,251,111,133,122,134.123,162. 0, 32, 53,107. 32 


200 data 


35.114. 76.255,179,189, 73,111,240. 6, 32.210,255.232,208.245 


205 data 


96. 76, 8.5,113,133,128,134,129,186,189, 1. 1,201, 15,208.241 


210 data 


189. 2, 1.201,180,208.234, 32,123,113.144. 71.165,128. 16. 2 


215 data 


230.119,162. 0,134,124.132,130,164,119,185, 0. 2. 56,253.184 


220 data 


111.240, 22,201,128,240, 22,230.124,232,189,183,111, 16.250,189 


225 data 


184.111,208,228,164,130, 76, 85,113,232,200,208,221.132,119,104 


230 data 


104,165,124. 10,170,189,231,111, 72,189,230,111, 72, 32,121,113 


235 data 


75,112. 0.104,104,165,128, 32,246,184.240, 47.173,136, 3,240 


240 data 


■42, 24,165, 17,109,136, 3.133, 96,165, 18,105, 0, 32, 63,113 


245 data 


162, 0.169, 32,157,111, 2.232,189, 0, 1,240, 6,157,111. 2 


250 data 


232.208,245,169, 32,157,111. 2,232,1.34,158. 32,132,108, 76. 37 


255 data 


180, 32,245,108,169. 1, 32. 14,109. 32.207,255.201, 13.240. 9 


2 GO data 


32, 20,109,165.150,208, 32.240,240. 32, 45,109, 32, 37,109.201 


2fiR rem hlock 2 


270 data 


1.208. 8, 32. 45,109, 32. 42,109,208, 8. 32, 24,109,169. 


275 data 


32. 20,109.165,150,240,205,152, 32, 14,109.165, 92,133, 42,165 


280 data 


93,133, 43, .■52.199,109, 32. 54,109,169,232,133, 50,169, 3,133 


285 data 


51.162, 0. 76.159,117.162. 0. 44.162,255.134,131, 32,191.108 


290 data 


76. 75,108,169, 13, 32,210,255, 32, 24,109, 32, 34,109.240, 7 


295 data 


166.131. 32. 6.^,109,176, 10. 32,199,109, 76,247.114,152, 32,210 


300 data 


255, 32, 34,109,168,240,220,201, 32,208, 8,138. 48,239,208,241 


305 data 


232,208.234,201, 59,240, 4,201, 39,208, 2,162,255,138, 48,221 


310 data 


166.131,240,217, 162,255,160. 0,232,189. 0, 2,201, 32.240,248 


315 data 


36,232,189, 0, 2,201, 48,144, 4,201, 58,144,244.189, 0, 2 


320 data 


201. 32,208, 1,232,189, 0, 2,240, 9, 41,127,153. 0, 2,232 


325 data 


200,208,243,153, 0, 2,200.200,153, 0, 3,200,200 200, 96, 32 


330 data 


60.245,160, 0,177,218,145, 42,200,196,209,208.247.162. 4.189 


335 data 


68.111,145. 42,200,202,208,247,132,209,165, 42,166. 43,133,218 


340 data 


134,219. 32.118, 0,240, 3. 32,245,190, 32, 52,116, 32,212,109 


345 data 


162, 2, 76,201,255, 32, 60,245, 32,118, 0,240, 3. 32.245,190 
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350 reml 


blocks 




355 data 


32.246,184, 32,163,181, 32,212.109.162. 2. 76,198,255. 32 17 




360 daia 


109. 32, 20,109.160. 0,145, 92.230. 92.208, 2,230. 93, 96 32 




365 data 


34,109, 32, 24,109.160, 0,177, 92. 96, 32. 45,109,165 92 208 




370 data 


2.198, 93,198, 92, 96,165, 40.133, 92,165, 41,133, 93, 96 32 




373 data 


34.109,133, 64, 32, 34,109, 76,102.116, 32, 52,116.208. 3, 32 




3S0 data 


24.109, 32.223.186. 32,225.255, 32, 20,113. 32, 34 109 240 5 




385 data 


32, 63,109,176, 3, 76,255,179,166, 64.165, 65, 32,131,207,169 




390 data 


32, 32.210,255,162, 0, 32, 31.109,240.212,201, 59,240, 56,201 




395 data 


32,240, 6. 32.210,255,232.208,237.224. 7.176. 6, 32.210.255 


, 


■100 data 


232,208 246, 32, 34,109,240,183,201, 32,240,247. 32,210 255 232 




405 data 


32. 34.109,240.170,201, 59,208.243, 72,169, 32.224. 23,176 6 




410 data 


32,210,255.232,208.246,104. 32.210,255. 32, 34,109,240,144 208 




415 data 


246,108,252.255, 76. 0,112, 32,204.255,169. 1. 32.226,242,169 




420 data 


2, 76,226,242, 32,231,255,166,209,240, 99.134, 9.169, 1,133 




425 data 


210.169, 8.133.212,169, 15,133.211.169, 0.133.209. 32 99 245 




430 data 


32, 204, 255, 165, 9, 133, 209, 169, 2. 133, 210, 169. 8. 133. 212. 169 




■535 rem block 4 




440 data 


2,133,211, 32, 99,245,162. 1. 32.198,255. 32.207.255.133,134 




445 data 


32,207,255,133,135, 5,134,201. 48,240. 25,166,134,165,135 32 




450 data 


49,215, 32,207,255, 32,210,255,201, 13,208.246, 32,199,109,104 




455 data 


104, 76,255.179, 32,207,255,201. 13.208.249. 76.204,2.S5 169 255 




460 data 


133, 55, 76. 0,191, 32, 60,245, 32,118, 0, 32,249.110,162, 




465 data 


134,132,134,133. 32,212,109,152, 2, 32,198,255, 32, 20 113 201 




470 data 


239,240,110, 32,207,255,166,150.208,109. 32,210.255.201 59,208 




475 data 


235,160, 0,132, 31,132, 32, 32,226,110,240. 52.133,131, 32 74 




480 data 


113, 32. 4fi,l!l, 32,239.110, 32, 39,111, 24,165.251,101, 96,133 




485 data 


251.165,252,101, 95,133.252, 32.226.110,145.251,209.251,208. 43 




490 data 


200, 32, 46,111,198,131,208,239, 32,239,110, 32, 56,111,240.172 




495 data 


32239,110. 32, 39,111,165,251.197, 31.208. 24.165.252,197. 32 




500 data 


208 18. 32,239,110, 32, 56.111. 76.215.110,152, 81. 44 162 95 




505 data 


44,162, 60, 44,162, 42, 44,162. 68, 32. 53,107. 32,199,109 76 




510 data 


2.'^.5, 179, 32, 99,215. 72,166,150.208,237. 32, 34.215, Id, 95, 32 




515 data 


84,215,166,150,208,225. 76, 23,215.240. 33. 32.245.190.240. 28 




520 rem block 5 




525 data 


32, 28.111, 32,141,215,162, 4, 6, 96. 38, 95,202,208,249, 5 




530 ddtd 


96,133, 96, 32.112, 0.240. 14.198. 97.208.231,162. 0,134. 95 




535 data 


134, 96,162, 4,134, 97, 96.165,251, 32, 46.111.165,252, 24,101 




540 data 


31.133, 31,144, 2,230, 32. 96,165,251.197. 31.208.144,165,252 




545 data 


197. 32,208,138. 96, 87, 44. 83. 44,147, 42. 42, 42. 32, 67, 79 




550 data 


77, 77, 79, 68, 79, 82. 69, 32. 65, 83, 83, 69, 77, 66, 76, 69 




555 data 


82, 32, 69, 68, 73, 84, 79, 82. 32. 52. 46, 18. 32, 42, 42, 42 




560 data 


13, 13, 0, 13, 66, 65. 68. 32. 82, 69. 67. 79. 82, 68, 32, 57 




565 data 


79, 85, 78. 84, 0, 13, 66, 82, 69. G5, 75, 13. 0, 13, 69, 78 




570 data 


68, 32, 79, 70, 32, 76, 79, 65, 68. 0, 13, 78, 79, 78, 45, 82 




575 data 


65, 77. 32, 76, 79, 65, 68. 0. 13. 67. 72. 69. 67, 75. 83, 85 




580 data 


77, 32, 69, 82, 82, 79, 82. 0, 67. 79. 76,196. 67, 80, 85,212 




585 data 


70, 73, 78,196, 67, 72. 65, 78. 71.197. 70, 79, 82, 77, 65,212 




590 data 


71, 69,212, 80, 85,212. 66. 65. 83. 73. 67, 4.5, 65 73,196, 76 




595 data 


79, 65, 68. 69,210, 0,192,109, 53,108. 19.115, 19.115, 73,109 




600 data 


224.107, ,56,108,195,109. 58.110. 0,107, 68.107, 48, 49, 48, 52 
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The Commodore 64 
Joystick Ports 



Greg Beaumont 
Ingersoll, Ont. 



Anybody Irying lo use a joystick on the C(j4 may have found 
it a bil difficult. The major problem is the ports used for the 
joysticks are also used in keyboard decoding. So 1 decided to 
write a joystick routine Ihat would suj^presi llie keyboard 
scanning wbile reading the joystick values. 

The joysticks ports are Ihe parallel ports found in CIA 1 
(6526) at $DCOO (5S320 decimal). Each joystick requires 5 
bits: four bits for Ihe four major directions and one tor the 
firebutlon (see fig I), 

The sample program is self documroenting. The possible 
values returned for the X direction are -I (left), (center), I 
(right), and for the Y are -1 (tip). (center). \ (down). When a 
firebullon is pressed either a zero {not pressed) or non zero 
(presM^) value will bt; returned from the subroutine at 
630O0. 



100 rem sample joystick pio;^ram 
no sx = 0;sy = 0: print "H" 

115 input" select joystick port (1 or2)";pS 
120 iipSO'T" or'pS<>''2" tiienllS 
200 gosub 63000 : rem gel joystick values 
'M) if p$= "I ■■ thensx = sx + ax :sy = sy+ay 
305 i(p$="'2'' then sx = sx + bx ;sy-ity+by 
310 ifsx<0orsx>40fhensx = 
320 ilsy<0orsy>40ihensy = U 
400 polte 1024 ■*- sx + 40-sy. 160 
500 goto 200 
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63000 
63001 
63(}():J 
G3003 
63004 
630()S 
63006 
63010 
6:i()15 
63020 
63030 
63041) 
63050 
63060 
6:107(1 
63080 
63090 
63100 
63999 



rem " Joyslick routines for C64 by Greg Beaumont Ingersoll 

rem ax : x value for joystick port 1 

rem ay : y value for joystick port 1 

rem fa : non zero if firebutton 1 ts pressed 

rcmbx : x vaiucfor joystick port 2 

rem by y value forjoystick port 2 

rt;m fb : non zero if firebutton 2 is pressed 

ifft = 0thendim)(1,10);forj=0lo10: read i(O.l), j[1.I) : next : ft=l 



na = i:i*4096 -f 12*256 

poke da+ 13. 127 

poke da + 2, : poke da + 3, 

a = 25J^-peek(cia} : b = peek{da+1) 

fa = aand 16:fb = band 16 

ax = f{0, a and 15): ay = j(1, aaiitl 15) 
hx = j(0, hand15):by = j{l, band 15) 
poke da+2. 255 
poke da+ 13, 255 



: rem set pointer to da 1 (joystick ports) 

: rem disaWe irq interrupt 

: rem set boffi joy ports to inpul mode 

: rem get raw joystick values 

: rem set fire button slalus 

: rem set joystick pen 1 values 

: rem set joystick port 2 values 

: rem restore regular values 

: rem restore irq interrupts 



return 

dataO,0,0,-1,0. 1,0. 0.-1, 0.-1.-1, -rr 0,0. 1,0,1. -1J.1 



COMMODORE USERS 

Join the [argest, active Commodore 
users group in Nortti America and get— 

— Access to club library of over 
3000 free programs. 

— Informative club newsletter. 

— The latest information about 
the PET. CBM.VIC, Super- 
PET and Commodore-64. 

Send $20.00 ($30.00 overseas) for 
Associate Membership to: 

Toronto Pel Users Group 

Department "M" 

381 Lawrence Avenue West 

Toronto, Ontario, Canada M5M 1B9 



VIC-20 .. CBM 64 

EXPANDER BDHRDE 




4 Slol r« Ihe M- T&qQje swifchK an3 
resel swuch. 

P/N C64 •€9,95 



PTI offers The UubsI selection 
Of expander boards available 
for tfie ViC-20 anfl CBM 64 
The design features quality 
cor^stfuction, and compelilivG 
prices mako any of Them an 
exceptional value. New pro- 
ducts are being added roonlhly, 
su write for complete caiaiog. 





A 3lor tv Ihe VIC, Toggle ^wiches 



p/w V3e 



»79.9S 



Siol for iri« VIC. NO swilcnea rewi or 



M9,95 





4 9lQLl»r[rH VICTDg^ieswitcriesaQd 



P/N V24 



*69.95 



PftEClSIOK TECHHOLOGir, INC 
-OMPUIEP PflODUCTS &IV(SlOh 

po acx 1S4B4 

SALT lAlb CITY UTAH BIIIS 

[BO 1 1 nJ-52ti 



i S4at rof me VK. slide bwuches. no 
P/N V23 -59,95 



See yoLJr dealer, or place 
your order direct 

VISA-M/C'CHECK-COD 
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CBM/PET INTERFACES 

The Connecting Links 

CmC provides the link lo increase 
your compiler's functional ability. 
The following models come 
complete with case and cables and 
have a 30 day money back trial 
period. 

PRINTER ADAPTERS 

— addrdssabld-swiic^ selectable 
upper/lowor. lower/uppercase 

— works wilh BASIC. WORDPRO, 
VlSIGALC and other software 

*— IEEE card edge connector for 
connecting disks and other 
periphtirala lo the PET 

— power from printer unless 
otherwise noted 

RS-232 SERIAL ADAPTER — 

baud rales lo 9600— power supply 

induded 

MODEL-ADA 1450a $149.00 

CENTRONICS/NEC PARALLEL 
ADAPTER — Centronics 36 pin 
ribbon connector 

MODEL-ADAf600 $129^00 

CENTRONICS 730/737/73ft 
PARALLEL ADAPTER — 40 pin 
card edgL connector 
HODEL-ADA730 $129.00 

EPSON MX -70 PARALLEL 
ADAPTER — handles graphics — 
BASIC 4.0 required 
MODEL-ADAX70 $129.00 

COMIMUNfCATIONS ADAPTER — 

senal^i parallel ports — true ASCII 
conversion — baud rates to 9600 — 
hair or full duplex — X-OH. X-OFF — 
selectable carnage return delay — 
32 character buffer — Centronics 
compatible — power supply 
included 
MODEL-SAOI S29&.00 

ANALOG TO DIGITAL 
CONVERTER — 16 channels — 
to 5. 12 volt input voltage range 

— resolution 20 millivolts per 
count — conversiori time less than 
100 mtcroseconds per channel 
M0DEL-PET5ET1 $295.00 

US Dollars Quoted 

$5,00 Shipping & Handling 

MASTEHCHARGEA/ISA 

All prices & specifications subject to 
change without notice 

MENTION THIS MAGAZINE 
WITH ORDER AND DEDUCT 
5% FROM TOTAL 

^^J THE USA order from: 

CoFinecticut microCompuier, be 
Irslrumeni Division 
35 Del Mar Dnve 
Brookffeld, 0^06304 
203-775-4595 TWX: 71Q456-0O52 

irJCANADAorderlrom: 
Batteries Included, Ltd^ 
71 McCaul Street 
FBTnfontn C;inada MSTPVI 
(416)596-1405 

Deaier inquiries tn\/ne(r 



** ALL NEW!!! ** 

^_ ^^ ^» * * t ^_ ^^ ^^^ 

SOFTWAR8 FOR COMHODORE 64 

WORD-PAC $74.95 

Print up to 99 pa^es of rext. 

Automatic tabbing/Ceniering/UndMllnlno. 

Copy Lintt&'Ueroa/Plus Moral 

CodOd in Machine language. 

CALC-PAC $74.95 

Irterface-Compalibie with WOPD-PAC & DATA-PAC. 
Codad in our own Unique Spiead-Sheet language. 
User-Frion<}ty Math«matical Applicaliona. 

DATA-PAC $39,95 

Interface-Compatible wlt^ WORD-PAC & CALC-PAC. 
User defJnad Formatft^Search & Sorts. 
Printer compatabie, 

EDITOR-PAC $69.95 

Complete Programmer'a Editor 
Aut<>-Nuribor/Ror> umber including goto & goaub. 
Prcgram Mergo/Globdl Search arMj Replaco. 
Rus Mucn Mora! 

ASSEMBLER-PAC $59.95 

Programnwra take r>ote' 

Mnemonic formal to MacMr>e. Language. 

iJnK Modules/ Externa I referencas. Morel 

HOME-ACCOUNTANT $29,95 

Checkbook wi(h roconcj Nation roulirke. 
Hard-Copy nstmg opuon. 
Search and Review/ChBrl of Accounts. 
Income and Expense. 

ANNOUNCIHO . . . 

The PCS/9064 Upgrade Module for me 64 

On power-up the PCS/B064 provider: 
SO-column video ootpuL 

WORD-PAC wofd processing. 

CALC-PAC spreac sheet maihemauca^ 

DATA-PAC data base system. 

Exit to BASIC 

All Apptk:at}ons iniBrtace-Compatibie 

Plus Fiiil JIne of Games/Home Software lor 64 

Dealer Inquiries Encouraged 

CommOOOrs 64 and (^ are rraa^inarks ol CotrjnoCoig 
Busriess Machines 



PAQRC COAST SOFTWARE 

3220 S. Brea Canyon Rd. 21 6 S. Main/Box 1 47 

aanxjnd Bar. GA 91 765 LeSueur, MN S60&6 

(7141 594-8210 (S12J 665^724 



N4id-Easlem QstributiQn: 

PERIPHERALS PLUS (215) 687-S540 

1 55 E. Lancaster Ave. - Wayno, Penn. 19067 

^4ew Er^giarKJ Distribolion: 

OWICRON {617) 769-6867 

1415 ProvioerKe Htgnway - rkDrwood, rviasa 02062 

EkcIusiv© Canadian Distributer: 

Computer WuiKshups Lid (416)366-6192 

465 King St. E, Unit 9 - Toronto. Oni. MSA 1 L6 





-RAM Opens Up 
The World Of CP/I 
To The Commodore 
Computer! 



TM 



Z-RAM, a circuit board that fits inside the Commodare 4000 and 8D00 
computers, adds a Z-80A microprocessor and 64K of Random Access 
Memory [RAM], tripling the current maximum user memory! 

Also provided with Z-RAM is the CP/M operating system, adding a new 
dimension to the Commodore computer by finally making the vast world of 
CP/M software available to its users. 

With the addition of the Z-RAM board , Commodore computers will operate 
with 96K RAM and use both the 6502 and Z-80 processors. Several modes 
of operation are possible: 

• With Z-RAM installed, all earlier versions of Commodore computers 
[regardless of memory capacity] can function as 32K machines. 
All current programs will run using 32K memory and the standard 
6502 processor. 

• Z-RAM permits the 6502 to use the full 9BK of menricry to operate 
the new expanded versions of Wordcraft Ultra, WordPro -Plus^'^ 
and other expanded Commodore programs. 



• The Z-80A processor will operate in 64K memory and will run the 
industry standard CP/M operating system. WordStar™, Super- 
Calc"^^. and Accounting II Plus™ are only a sample of the fantastic 
CP/M programs now available to run on your Commodore 
computer! 

Contact Your Nearest Commodore Dealer Today 

You'll Be So Glad You Did! 

Cmnedmn 
HMributor: 

COMPUTER 
WORKSHOP 

465 Kings Street East, IJr^it 9 

Toronto Canada M5A1L6 

1416J3B6 6199 



Unrtad Sutss 
DiBtributoP! 

COMPUTER 
MARKETING services inc. 

300W MHr[tonPikft. SuitftPG 
Cherry Hill, New Jersey 06002 
1609] 795-9480 



Z RAM IS su^BMmart Of lAflaon Compucer 
CP/M e a tTBUerraft qT Qgntf ^ineflnin 



Software 

Adveriiser 



Advertising Index 



Product Name (Description) 



Hanafaclurcr 



Issue' / Pafte 
12 3 4 5 



Computer Maikcling 

\Canadian Micro 
Micio Applications 
Pacific Coast Software 
Precision Solrw^re 
Wycor Business Systctos 

Hardware 

Advertiser 



Calc Result (spreadsheet prog.) 

Master (programming aid) 
CG4: Ulilily, Business. Games 

Superscript (wordprocessof) 
Provincial Payroll 



IBC 



IBC 
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Product Wame (Desciiplion) 



MaiLufaclurer 



Issue' i Page 
12 3 4 5 6 



Computer Workshops 

\Computer Marketing 

Connecticut microCompuler 

Precision Technology 
Rjchvale Telecommunications 

Accessories 

Adveriiser 



Z-RAM(CP/M board) 

PET/CBM Interface adapters 
V1C20/C64 Expander Boards 
C64 Link (IEEE adapter) 



Madison 



Product Name (Description) 



Manufacturer 



<2 

IFC 



Issue' / Pane 
12 3 4 5 



Consul tors [nt'i 



■■ 

41 



Leading Edge Inc. 

Toronto PET Users Group 



Stock Market With Your PC (book) 
A To Z Book Of Games 
Dynamics Of Money Mgmt (book) 
invmeni Analysis w/Your Micro (book) 
Elephanl Diskettes 
Membership info 



In The Next Issue Of 

The Tronsactor 

The Reference Issue 

(The one you'll want to keep!) 

All CBM Memory Maps 
CBM ROM User Entry Points 
New Butterfield SuperChart 
1982 Magazine Bibliography 
All CBM Port Pinouts 
Language Command Summary 
Plus loads more! 

Keep On Transactin'... 



64 
64 
64 
64 
BC 



61 



PET/CBM 

PROVINCIAL 
PAYROLL 

WycorBusiness Systems has developed 
a complete payroll system for Canada. 

• Set up files for over 200 em- 
ployees • Calculate and print 

payroll journal • Print cneques 

• Print monthly submission for 
Revenue Canada • Accumulate 
and print T-4s • Complete em- 
ployee lists. 

This system comes with full user docu- 
mentation and tutorial disk. 

Complete System $850,00 

Manual only 25.00 

CallcoIhU (416) 444-3492 for 
information or contact your dealer. 



WYCOR BUSINESS 
SYSTEMS LIMITED 

170 THE DONWAY WtS i, STE. 401. 
DON MILLS, ONT, M3C 2G3 




Ihv Troniatror 



64 



Joniftiry 19B3 



A Mora Powerful Planning 
And Forecaating Tool Than Any Other On The Market . . 






uvMh multiple pagM o\ 03 n 254 cellt 
which iilillzea only Ihfl m^mnry 
incellilhitiri icilvt 

Pr(uiLji:eHOfAphlci(Hltioorami)onacrien 
ind printer 

Qivfia unlliTiittd ooatihllHIti In iioh oall with 
IF THEN£LQEv^ilhAND,ORdnJ NOT ELSE 
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N 
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Available now for 8032 and 8096 - coming soon for Commodore 64, 

FOR FURTHER iNfORMAVON CONTACT VOUn NrAREST COMMODORE DEALER 

OH 



1NCANAUA 

CANADIAN MICRO DI8TRIBUT0 

BO0fittt#l*i Avfiiitii 
MHii>i>,Oh!ario,Uan|(lfii LUI 3P7 

.^^iis»67a?a/7 



IN THE U3 A 

MPUTER MARKETING SERVICES INC. 

300 Wu«1 Mflfltun Pme< Suite » 
ChmryHIII, NflwJoflBV. UB A naOM 
4&D0I ?Q& 04^0 



CALC RE8ULT'3«/r«c/>/Tf£rfA of HamitcSottv^iafvdb 





"NfcVER 



OROfTS' 



MORE THAN JUST ANOTHER PRETTY FACE. 



Say^ who? Sap ANSI 

Specifically, lubcommittee )C3B8 of the American 
Nujiofujj Standards Instttufe (ANSI) says so. The fad 
i^ all Eleuliunt^"' floppitj^ fii»el or excerd the specs 
required to meet or exceed all their standards* 

But iij^t who is 'subcommittee XSBS" to issue such 

pronounctmtiiils? 

TheyVe o group of people representing o large, 
wf^li-hnlnnred crn^s *iftrtion of disciplines— from 
acaderiiia,guvtirnmtfnt aqenciea, and the compuTer 
industry. People from places lilte IBM, Hewlett -Pock ord, 
'IM, Lawrence Livermore Labs, The U,S, Depcirtmf^nt 

of Defense, Honeywell and The Aisaciotion ot Com- 
puter Programmers and Anolysts. In short, it's a bunch 
of high-colih('r nitpklcers whose mission, it seems, in 

order to make uctttii dfsks for consumers, is also To 



make life miierablo for everyone in the disk mokiny 
biisinesL 

How? By gathering together periodically (often, 
one luipects, under the rull moon] to concoct morg 
und more rules to increase the quality of flexible 
disks. Thtjir n^ost recent rule book runs over 20 -jnriln 
spaced pages— lifting, and msistiii^] upon— hundreds 
upon hundreds of standards a disk must meet in 
order to be blessed by ANSL [And thereby be taken 
seriously by people who lukv di>l<^ scriuusly) 

In fact, if you'd like o copy of this formidable docu- 
ment, for free, just let u^ know and we'll send you 
one. Because oiko yuu knuw wliut it tuku^ tu muku 
on Elephont for ANSI . . . 

We think you'll wont uk to make sorm Eliphonts 
for you. 



aEPHANT. HEWY DUTY DISKS. 

For o fmt posk»r-size porlmit nt our powerful piK hydemi, please write us. 

Distributed Exclusively by Leoding Edge Products, Incn, 225 Turnpike Street, Canton, Mas^oclius^tls 02021 

Coll: toll-free 1 800 343 6833, or in Massachusetts call uolloct (617) 828 8150. Telex 951 624. 



